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Anmeldelser og tests 



SIELMK 49 Keyboard 7 

Man kan fa et »rigtigt* keyboard 
til 64'eren. RUN har testet det 



Datasangen 8 

W har testet et par at de virkel/g 
gode musikprogrammer til 64'- 
e re n . 



Play et again 10 

Med Magic Vofce kan du komrne i 
snak med din computer. 



Musik fra Data Becker 12 

Det tyske firma Data Becker be- 
gynder ogsa at vinde indpas pa 
det danske marked. Vi har testet 
deres mus/'kprogram og lasst de- 
res musikbog. 



Der var for tredje gang 58 

Eventyrsiden fortsastter med en 
gennemgang af de nyeste adven- 
ture spil. 




Tips, tricks og vejledning 



Lydchip'eniCBM64 6 

De fleste fasreboger gar let hen 
over lydchip'en. RUN starter en 
artikelserie om dette emne. 



Begyndersiden 22 
Efter utallige opfordringer starter 
vi vejledning for begyndere - og 
vi starter belt fra bunden. 



Nye horisonter 46 

Pi et etter andet tidspunkt bliver 
det almindeligt med modems. 
RUN tager hul pa fremtlden og 
anviser en gratis database. 



Comal 80 skole 48 

Vi bringer her anden del af vores 
Comal-skoie. 



Input/Output 54 

RUN 's lasserbrevkasse I en udvi- 
det udgave. Der er med garanti 
noget, du ikke ved i forvejen. 



MaskinkodedeU 60 

Vi ser denne gang pa de forskelli- 
ge adresser/ngsmider, der findes 
i assembler. 



Programmer 



Fastload til diskette 20 

Tor Engebakken har igen /aver ef 
fremragende program. Pust IN i 
din sieve l54Ver med Fast toad. 



Programsektion 25 

Denne gang stir programmerne 
mest i tipningens tegn, men der 
er ogsa andre spasndende pro- 
grammer 
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A PUBLICATION Of 
CW COMMUNICATIONS 



Andet 



Musik pa 128'eren 11 

Vi tager forskud pa glasderne og 
kikker pa 128'erens lydmulfghe- 
der. 



Skolenog EDB 14 

RUN har rare/ ude at kikke pa, 
hvordan det gar med dataunder- 
visningen i skoien. 



Indtastningsvejledning 42 

Lass den ter du begynder at taste 
dine programmer ind. 



DATATIPNING 



52 




RUN Amok 



66 



Her bringer vi korrektioner efter- 
handen som vi tinder dem. 



Programlistninger 



Programloader 

Kassetteoms/ag 

Reversi 

Tipsprogram 

Fastload 

Listning 1 

Ustning2 + 3 



25 
26 
29 
30 
38 
40 
41 
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Mangier du noget til din Commodore 64? 

VI HAR DET 



ADMINISTRATIVE SYSTEM ER 



COMF1 NANS 



version 
2.0 




Fiimnshoghnlderiet lil Commudurc 64. der cr hie- 
Vet cn bestseller i total ui ct 81 Over 250 sysicmcr 
korer pa BttVa&endti lidspunkt. 
COMFINANS cr bSevel lorhedrei igen. ved a! 
man kan fa udskrifl af cn konln paska-rm. saml cn 
saldobalance lil enhver lid. Hustigheden cr ogsa 
hlcvel fnrogct. 

Kapacitet: 1200 posteringer pr. peril »de.3lKlkonli. 

Og prison cr dct bedsit: 
ved del hclc. Ft*rkr 2,095.- NU kr. 



1.595 



version 
2.0 




Fakiurasyttcmel lil Commodore 64 der ikkc har 
noacn konkunenl. 

frikturering, kontnudtng. renicbercgning, lagci 
og rncgci mere, Pnmriiminei kun kwre svlvsUendigt 
efier inicgrcrcs mcd* COMFINANS. 
Kapaeilel: 250 ktindcr. 250 varer 

NUkr. 1.795 

Begge systemer samlet kun kr. 2.995,- 



frtrpriskr. 2-595.- 



SP/ENDENDE UDVIDELSER 




Parallel Printer 

Interface med16K buffer 



Med dene interface kan man tilsluttc 
mi-Men enhver parallel primer lil sin 
(ommudore 64. Den tilslutlcs den 
senelle udgangog hen viler 
ikkc no get software. 

Pris kr. 



1.104 




80 tegns tekst- 
behandlingskort 

Her far Du el S3 teens kirn med l>ANSK teksi- 
hehiindling Endelig kan man so 80 legn pa 
vka-rmen, nar man skriver sine breve. Endvi- 
derc har Jen et digiiall nr. fastfrysning of 
Inner osv. -4 "7^0 

Priskr I. #40 



COM-IN 64 

Ft hell nvt produkt Ira MCH. 
COM-IN 64 cr et kommunika- 
(innsinterfucc med fjictlilct som 

CW. RTTY. TEXT. MODEM. 
MAILBOX. AFSKOIT 
Kommunikalumsinlerfaeel til 
begvndca'ii og den 
professionelle 



Pris kr. 



3.039 



Eprom brsender 

Her er Din Eprom hnender lil 
Commodore <i4. 
Software cr nu- 
lurligvis med i 
prisen, Brxncie- 
ren kan bra.'nde 
eprom typcr fra 2508 lil 2712H. 
l-ndvidere mcdfolgei der Eprom- 
kort til tilslulning :if dc Kproms 
man har nnendt. a f)Af\ 

Pris kr.l.J49 




Eprom sletter 

Eprom sletleren kan sleile up lil 
fire tproms 
ad gangen og 
arbejder fuld- 
starndig 
uafhicngig ii\ 
eomputeren. 



Pris kr. 



707 




Motherboard 

Tilladertilslutningaf flere modu 
Icr af cn gang, F.cks. 80 tegns 
kon ng Simons Basic. 
Motherbnardcne er naturligvis 
med omskificr. 

jpufu-241 1- 

5 none 741 



DE BEDSTE B0GER 



fra 1st Publishing (Data Becker) 



Tricks & Tips 

!•■■.. i .-I'-.. i idcer lil. hvordan man 
lavci eri'ekiive prognimrncr. ved brug 
al uullifleprogramckscmplcr. Den 
dunner nagErund for kerning af Mtfrrc 
opgavei Pris kr. 248,- _ 
Tricks and lips disk med 
I pT.igr.umnci kr. 85,- 


Anatomy of 64 

Bogen pit luldsixiiUm i dvbden med 
Commodore M og dens virkemade. 
Den hnrl.ckv endeiiilierei ROM Iwrt- 
ning med iorKUring. DcttJdcn mange 
e kse mplcr pit programmer . 
sri man kun prffve del hclc 
iprak^s Priskr. 248,- *i 
Bogen enhver C Vumnudoic 

pier hunk- have tffl 


Anatomy of the 1541 

Bogcn glvet en luldslicndia bcsknvel- 
*e af . hvordan Du hedst uinvllei til 
din VC 1 541 Bogcn indcMder des»- 
uden en lotil ROM-liMnuij; al 
DOS'en. Bogen man ikkc 
kan undvitre Pris kr. 248,- ^ 

p 


; 1 

Machine Language 

M jbktnsproRSpmgniin mcring cr 
\dersi flcksibcll og mcgcl hitrligcfc 
end Basic. Bogcn cr cn hegyndcrhog 
ng fnrtirilcr vm de grundlxggende be- 
vrehcr indenfor mask in- _^p^* 
kikJeti Onukci 15u ,it hive 
maskmkode • hcrct bogcn - XgA 
du hat dnanal dm 
Priskr. 248,- 


r— m 

Adv. Machine w 
Language 

Dcnnc hogcren fonsxttcba al 
Machine I-imgungc bogen, pg gar 
mere i dvhden med mu.>Jtinpn>grum- 
mcring. Bogcn ci uundvicihg tor den. 
sum vinsker nl Wive hedrc i nl pro- 

grammere i nrnskinkodc. Pris kr. 248.- 


— - %m 

Idea Book ^ 

Bogen cr cn forslwcitcUc 
lil Tricks & Tips. Den hjxlper en igang 
med MMrrc program rrteringsopgaver 
og analyscrcr forskclligc starn: 
ptogrammei. Hoacn der ikiillc *ta pji 
Din hvldc.Pris kr. 248,- 


Graphics Book 

Mar du prnWemci med al * 
lave gnifik pa Din Commodore W. 
Ikkc mere' Bogcn hur cktemplcr pii, 
hvordun nun kun liiuge )n>jopltV' 

ning^grafikken nu CDnunOwIt 64 
Pris kr. 248.- 


Peeks & Pokes 

Bogen ci e| Qpslttflff- 
• v*rk lil ot brugc olle dc nyiligc adrrs- 
wr, dt*r Findoi ni Commodnrc M. 
Denncbog omnandlcr del. mange 
Commodore n4 ejerc har lavnct. 
Pris kr. 22S,- 
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Compti I etworld/ Ar^enlm* . 
Buyer's Oirtde. 
Australia Compularwortd. 
AuBtralinn PC Wortd and Dirpclorm 
Dull Miws, 
Micro Mundo 
Compulwwodd Canada. 
PC Worfd Canada 
CompuKHworld DimmaitL 
pc world, 

Buyer 1 iQuide. 
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PCjr. Wortd, 
Run. 
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Mens in venter 

Det har aldrig veeret nogen hemme- 
lighed. at USA er adskillige ar forud 
for Europa, men med de transport- 
og kommunikatlonsmulicjheder, vi 
har i dag, burde den reelle afstand 
kun vzere et symbolsk tidsrum. 

Derfor kan man asrgre sig over, al 
tingene i praksis er anderledes. 
Mens vi utalmodigt gar og venier pa" 
1 28'eren. er en ny stjerne ikke alene 
dukket op, men ogsa kommet p§ 
markedet i USA. 

Stjernen hedder Amiga, men 
hvornar vi ser den herhjemme, det 
ved kun guderne. Commodore sky^ 
der p& begyndelsen af nseste ar, 
men deres trovasrdighed i den rei- 
ning lader meget tilbage at onske. 

1 28'eren skulle vasre kommet 
kort for sommerferien, men efler 
adskillige udssettelser hedder det 




nu ultimo oktober. I den forbindelse 
kan man ogsa asrgre sig over, at 
maskinen faktisk harvserei pa mar- 
kedet i Tyskland et stykke tid, sa 
se Iv pa det Europseiske marked st&r 
Danmark som et lille u-land.Stum- 
perne til 1 28'eren bliver lavet i det 
fjerne Osten, men samlet i Tysk- 
land. Pa samlefabrikken har man 
imidlertid svaert ved at omstille pro- 
duktionen, fordi man er i gang med 
en anden succes ■ PC'eren. Com- 
modore skal imidlertid passe p&, 
ikke at miste markedsandel pa 
denne konto. 

Hvis vi ikke altid bringer tingene 
som vi tror og lover, er det fordi vi 
ogsa ma leve med det kaos. der 
hersker pa computeromradet. Det 
er irriterende. men der er ikke ud- 
sigt til, at det lysner. 
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PROFESSIONEL TEKSTBEHANDLING 



CBM 64 WRITER PROFESSIONAL 
version 4.0 
af AXEL BANG 

TIL COMMODORE 64, SX 64 og C 128 

Programme! tndctioidcr M.a.: 

- 28.S00 tegn 

- Daruk karokicrttei 

• Linicoritnicrei 

- Auiomaiuk linicskifi 

- Avanceict icdigcring 

- Fuld tabulator 

• Alf&sorirring 

- For-Zbaglicns scroll 

• AuiomaiUk ifig/ersiai ord 

- Kalkulaior 

• Formaijuuertng 

- Sammenkotiling al flcre dokumentcr 

- Fuld sikkcrhed mod iab af <eks< 

- Forberedi lil foiotaii 

- Udskhvning pa typchjulsskrivcr 

- Og ineget mere .... 

Med programme! felger en udftirlig let forstaelig dansk brugcrvejlednin^. 
Proiframmet er udviklet af journalist Axel Bang. 
Dansk brugerscrvicc (hotline). 

Pris, EPROM version kr. 675,00 incl. morns 

Pris, DISKETTE version kr. 575,00 incl. moms 

Forsendelsesomkostninger kr. 20,00. 

ENEFORHANDLING 
Danmark, Svcrige, Norge og Finland 

software ^ DANSk"dAJA SERVICEApS 

Fasanvtcngei 307 
Postboks 29 



DK-2980 Kokkedal 



Telefon +45 2 24 3298 
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Lyd chip 9 en i 




Af Bjarne V. Jensen 
Commodore 64 er forsynet med en 
temmeltg avanceret lyd-chip 
(6581). Denne chip bestar af 3 ens 
lydgeneratorer. Hver af disse ge- 
neratorer har 4 forskellige klang- 
muligheder {stoj. pulser, savtak og 
trekant) samt et programmerbart 
lydstyrkeforlob (attack, decay, sy- 
stain, release). Disse ting er be- 
skrevet i den almindelige bruger- 
vejledning til Commodore 64, og 
vil derfor ikke blive beskrevet her. 



Derirnod star der ikke ret meget 
om, hvordan man frembringer andre 
klange end de 4 forstnasvnte, eller 
hvordan man sendrer disse klange 
yderligere ved hjaelp af det filter, 
som lyd-chip'en er forsynet med. 
Disse lydmuligheder vil blive be- 
skrevet i denne artikel (som i ovrigt 
fortsastter i na3ste n ummer) , For re- 
sten af artiklen lasses, vil det vasre 
klogt at sla op i brugervejlednin- 
gens tillaag P (memory map) over 
lyd-chip'en, 

Forst lidt om lyd i almindelighed. 
En »helt ren» tone (grundtone) be- 
star af en sinus-formet lydbolge; 



altfolisaetaJveoJOTicideholder lidt af 




Man kan aendre pa lydbolgens 
udseende ved at tilfoje nogle over- 
toner til grundtonen. Derved aen- 
drer man tonens klang. Harmonlske 
overtoner (eller harmoniske sving- 
ninger) er toner, hvis frekvens er et 
helt antal gange grundtonens fre- 
kvens. Entonepaf.eks. 100 Hz (100 
svingninger pr. sekund) kan swe- 
des indeholde harmoniske overto- 
ner pa 200-300 Hz osv. Msengdetor- 
holdet af disse overtoner bestem- 
mer lydbolgens udseende. 





N 


N 




N 









En trekant-tone indeholder kun 
ulige harmoniske overtoner (dvs. 
300-500-700 Hz osv.. hvis grundto- 
nen er 100 Hz): 




X7 



En firkant-tone indeholder ogsa 
kun ulige harmoniske overtoner, 
men i et andet msengdeforhold end 
trekant-tonen; 



Hvis firkant-tonens pulsbredde 
sendres, vil indholdet af overtoner 
aendres. og dermed tonens klang: 



Del giver i ovrigt en meget spe- 
cie! lyd. hvis pulsbredden aandres, 
mens lyden gengives i hojttaleren. 

En anden metode til at skabe 
flere overtoner er at benytte synkro- 
niseringsfunktionen i lyd-chip'en. 
Denne funktion er en speciel sam- 



menblanding af to toner. I resten af 
artiklen er det underforstaet. at det 
er lydgenerator nr. 1. deranvendes 
som lydkilde. Synkronisering vaal- 
ges ved at ssette bit nr. 1 i adresse 
54276 til el ettal (se fig. 1). 



Frekvensen pa de to toner, der 
skal synkroniseres. kan vaelges uaf- 
hsengigt af hinanden. Grundtonens 
frekvens vaelges i adresse 54286 og 
54287 (generator nr. 3). Synkroni- 
seringstonen vaelges i adresse 
54272 og 54273 (generator nr. 1). 
Ved at sendre synkroniseringsto- 
nens frekvens, aandres indholdet af 
overtoner drastisk. Man behover 
ikke at indstille andet i generator nr. 
3 end frekvensen. da resten af f unk- 
tionerne styres fra generator nr. 1. 

Prov at indtaste nedenstaende to 
programmer: 

1 S = 54272 

2 FORL = 0TO24:POKES-t-L,0; 
NEXT 

3 POKES + 5.29;POK£S+ 15.14 

4 POKES -|-24,15:PGKES + 4.19 

5 FORT = 0TO255:POKES + 1.T: 

NEXT 

6 POKES + 4.18 

1 S = 54272 

2 FORL = 0TO2:4:POKES + 
L,0:NEXT 

3 POKES + 5,61 :POKES + 15,20 

4 POKES + 24.15;POKES-f4.19 

5 FORT = 50TO20STEP-1 PO- 
KES + 1.T 

6 FORN= 1TO30:NEXT:NEXT 

7 POKES -f 4. 1 8 

I begge disse programmer aan- 
dres synkroniseringstonens fre- 
kvens, mens lyden gengives. 

Lyd-chip'en har en tredje rnulig- 
hed for at frembringe overtoner, 
nemlig ringmodulation, som er 
endnu en made at blande to toner 
pa. Ved denne sarnmenblanding 
skabes der nogle ikke-harmoniske 
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^cctt tetter; 



SIEL MX\ 49 

keyboard 



Af Steen Schmeltzer 

Det testede udstyr beslod af et ke- 
yboard med 49 tangenter, en di- 
skette og et band. 

Udstyret tilsluttes 64'eren elter 
SX-64'eren via et indsliksmodul. I 
dette modul er der desuden en ud- 
videlsesport for tilslutning af andet 
musik-udstyr. Mere derom sen ere. 

Jeg ma indromme, at jeg blev no- 
get skuffet ved forste blik Jeg 
havde ventet noget helt andet, men 
ved nasrmere undersogelse og hen- 
vendelse til Importoren, blev appe- 
titten atter vsekket, men testede ud- 
styr kan faktisk ikke ret meget. Pa 
den medfolgende diskette/ band er 
der 39 forudprogrammerede lyde. 
Nar disse er loadet, kan man frit 
vselge at spille en af disse. Der er 
mufighed for. al editere i de forud- 
programmerede lyde samt lyde. 
som man selv har defineret og 
gernt 




Editeringen foregar ved at sendre 
de forskellige parametre for lyd-chi- 
p'en. De fserdige iyde er de ssedvan- 
lige velkendte som banjo, klaver, 
harpe og klokker m.m. Personlig sy- 
nes jeg ikke, lydene lever op deres 
navne - dog med et par undtagelser. 

Desvasrre er brugervejledningen 
pa engelsk. og den er temmelig dar- 
lig. Det spaandende ved dette key- 
board er muligheden for al tilslutte 
andet musikudstyr, samt det store 
udvalg af software/hardware. Det 
har desvasrre ikke vaaret muligt at 
na og afprove noget af dette udstyr, 
men importoren har tilsendt nogle 



brochurer, der lyder meget spasn- 
dende. Lad mig f.eks. nasvne et pro- 
gram, der hedder noget sa fraakl 
som -16 TRACK LIVE SEQUEN- 
CER-. Der er her multghed for at 
optage og afspille paVfra 16 spor. 
Du kan lave playback fra et eller 
flere spor samtidig med. at dm ind- 
spiller pa et andet. Der er hukom- 
melse til ca. 4500 noder plus ind- 
bygget metronome. 

MK 49 koster kr. 1.995.00 og 16 
TRACK LIVE SEQUENCER koster 
kr. 995,00 pa kassette eller disk. 
ImportorRanders Musikimport 
ApS. Tlf, 06-41 11,88 
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► overtoner. som bl.a. kan anvendes 
ved efterligning af kirkeklokker eller 
gong-gong'er. Ring-modulation 
vaelges ved at saatte bit nr. 2 I 
adresse 54276 til et ettal (se fig.1). 
Ligesom ved synkronisering vaelges 
den ene frekvens i generator nr. 1, 
og den anden frekvens i generator 
nr. 3. Ved ring-modulation kan man 
imidlertFd kun benytte trekant-to- 
nen. Hvis en af de andre kurvefor- 
mer vselges. torsvinder ring-modu- 
lationen. Nedenstaende program er 
et forsog p& at efterligne en klokke: 

1 S = 54272 

2 FORL = 0TO24 :POKES + 
L,0:NEXT 

3 POKES+1,46:POKES + 5.12 

4 POKES+15.13:POKES + 24,15 

5 POKES + 4,21 

Ligesom ved synkronisering kan 
man pan5 mange forskellige lyde 
ved at aendre pa den * ene elier 



begge frekvenser, mens lyden gen- 
gives. Nedenstaende program 
frembringer en rumklang-lignende 
lyd ved at aendre frekvensen pa den 
ene af de to toner: 

1 S = 54272 

2 FORL = 0TO24 :POKES + 
L,0;NEXT 

3 POKES + 5,29:POKES + 15,10 

4 POKES + 24. 1 5 PO KES 4- 4.21 

5 FORT-20TO265:POKES+1.T 

6 FORN = 1T07:NEXT;NEXT 

Samtidig med at synkronisering el- 
ler ring-modulation anvendes. er 
generator nr. 2 stadig fri, og kan 
anvendes til andre formal 



indtil nu har det vaaret generator 
nr. 1. der har vaeret brugt som lyd- 
giver. Det kunne llge sa godt have 
vasret en af de to andre generatorer. 
Hvis generator nr. 2 benyttes. skal 
man anvende generator nr. 1 til at 
synkronisere eller ringmodulere 
med. 

Hvis generator nr. 3 benyttes 
som lydgiver, skal man anvende nr 

2 til synkronisering eller ring-modu- 
lation. 

I naeste nummer af RUN fortscet- 
ter vi med en beskrivelse af de filtre. 
der er indbygget i lyd-chip"en. samt 
lidt om de to hojeste adresse (noise 

3 - envelope 3). ■ 
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Af Robin Sagar 

Lydfacititeterne i 64'eron er en af 
dens virkelig steerke sider. Hvor 
mange hjemmecomputere kan 
mon prale af. at have en indbygget 
synthesizer? Men det at lave sin 
egen musik pa 64'eren har altid 
vaeret en vanskelig og frustre- 
rende opgave. I hvert fald Indtil for 
nylig, hvor flere firmaer har frem- 
stillet musik bide som software 
og hardware. I denne artikel vil jeg 
se naarmere p&, hvad disse for- 
skeilige nye produkter egentlig 
kan. 

SID-chip'en er en af 64'erens 
store styrker. Den klarer fx tre for- 
skellige oktaver/stemmer, stoj og 
flere forskellige specialeffekter Det 
er saledes forst og fremmest p.ga 
SID-chip'en at lyden/musikken i spil 
som fx. GHOSTBUSTERS og SUM- 
MER GAMES er sa fantastisk. som 
den er. 

Desvaerre er det med lyden som 
med sa megel andet ved 64'eren' 
Den er nassten umulig at bruge di- 
rekte fra Basic. Hvis man virkelig 



skal have noget brugbart ud af det. 
er man nod til. at anvende maskin- 
kode eller en af de faerdige versto- 
neraf udvidet Basic, man kan kobe. 
Men selv her vil del ofte vsere sa 
besvasrligt at programmere SiD- 
chip'en, at man nsesten har glemt 
melodien, nar man har skrevet en 
linje musik. Det er derfor meget 
glzedeligt, at flere firmaer nu har lan- 
ceret egentltge musikhjaelpevaark- 
tojer til brug pa 64'eren. 



MUSIC MAKER 

MUSIC MAKER fra Music Sales Ltd. 
er allerede blevet omtalt i RUN nr. 
3 1985, men bor dog lige naavnes 
her. Udover software bestar syste- 
ms! af et tastatur af plastic til at 
lasgge over det almindelige tastatur. 
saledes at de to overste raekker pa 
tastaturet svarer til to oktaver, 

Music Sales Ltd. har ogsa lavet 
tre software-pakker, som kan ar- 
bejde sammen med MUSIC MA- 
KER-tastaluret. Hver af de tre sy- 
stemer kan fas pa bade diskette og 
band, og med hver pakke folger et 



komplet saet noder til den musik, 
der tindes pa det pagaeldende sy- 
stem. Pa denne made far man mu- 
lighed for selv at spille pa compute- 
ren, samtidig med at systemet spil- 
ler. De Ire systemer er: 

1. POP HITS (»Telstar«; -House ol 
the Rising Sun». "Sailing-, "Mor- 
ning has broken- , »All right now- 
m.fl.) 

2. BEATLES-melodier (»Hard Days 
Night". »We Can Work It OuK »Get 
Back-, -Eleanor Rigby« m.fl.). 

3. POPULAR CLASSICS (»Hall of 
the Mountain King«% «The Toreador 
Song-, Mozarts -Night Music- og 
-Ungarnsk dans- af Brahms). 

Efter mm mening er den sidste 
den darligste af de tre. maske fordi 
det er lidl for svaart at reducere et 
80-mands orkester til 3 computer- 
stemmer. 

Faalles for de tre systemer er, at 
der er tre forskellige modes/til- 
stande, man kan arbejde i: 
1 Single Key Play, hvor spilleren har 
kontrollen over rytmen. Nar man 
trykker pa en tast. fremkommer to- 
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nen samtidig med at systemet spil- 
ler tonen t baggrunden. 
Z Rehearsal, hvor man skal trykke 
pa den rigtige tast/tone og i den 
rigtige rytme. Til gengaeld venter sy- 
stemet sa med at akkornpagnere til 
man finder den rette tone. 

Nar man kan en melodi tilstraek- 
kelig godt, kan man ga videre til 3. 
performance. Her spiller bag- 
grunds-»orkestret« af sig selv, og 
man er derfor ene om at spille me- 
lodistemmen. Den eneste hjaalp er 
en metronom. der slar takten. 



MUSIC STUDIO 

Firmaet ACTIVISIQN har ogsa lavet 
et musikprogram. Det hedder MU- 
SIC STUDIO, og kan fas pa bade 
band og diskette. Jeg har selv af- 
provet kassetteversionen, som jeg 
godt kan anbefale At LOAD'e sy- 
stemet tager kun tre minutter. og 
imens kan man se pa et skaermbil- 
lede af forhallen i MUSIC STUDIO. 
Efter LOADning skal man vaelge, 
om man onsker at arbejde med jo- 
ystick eller touchpad. Disse vil blive 
brugt til at bevasge den -taktfor- 
mede« cursor. MUSIC STUDIO er i 
ire dele. Music Editor, Music Paint- 
box og Sound Engineer. Music Edi- 
tor og Music Paintbox er rimelig til- 
gasngelig via "opening menu", men 
Sound Engineer bliver brugt efter 
kompositionen. til at forandre og 
torstasrke musikken (ligesom i el 
professionelt indspilningsstudie). 

2/3 af skaermen er i Music Editor 
dominerel af nodelinier (bade dis- 
kant og bas). Den nederste tredje- 
del er til »menu». Hver ting pa »rne- 
nuen- er illustreret ved en icon 
(computerterminologi for et typisk 
billede). Der er ogsa en affalds- 
spand, hvor man kan smide den 
musik ud, man har kasseret. Du har 
desuden mulighed for at printe din 
musik ud. Desuden er der et billede 
at en kassette. hvor man kan SAVE 
og LOAOE musikken. 

Det er let at skrive musik. Da jeg 
ikke har et touchpad. har jeg brugt 
joystick. Man bevaeger cursoren til 
den node, man onsker at bruge. 
Derefter trykken man pa fire-knap- 
pen, og noden er samlet op fra me- 
nuen. Et ekstra tryk pa fireknappen 
vil sendre nodens vaerdi. 

Nar noden er placeret pa nodesy- 
stemet. hvor man vil have den, vil et 
yderligere tryk sastte den pa plads. 

Nar man har placeret nogle no- 



der, har man sikkert ogsa lyst til at 
hore. hvad man har komponeret 
Man tager ganske enkelt cursoren 
til billedet af et ore og trykker pa 
knappen. Hvis du ikke er tilfreds 
med resultatet. er der en masse re- 
digeringskommandoer inclusive 
Delete og Insert. For vordende 
sangskrivere er der ogsa mulighe- 
der, idet man i Music Editor kan 
skrive op til fire linier under de no- 
der der er komponeret. 

Efter at have afsluttet kompositi- 
onen har man mulighed for at redi- 
gere pa lyden. Dette gores i -Sound 
Engmeer«-delen. hvor man fra en 
menu kan vselge mellem 16 forskel- 
lige instrumenter som f.eks. trom- 
mer. tuba, violin, ftojte eller klaver, 
Desuden kan frekvensen og okta- 
ven aendres. 



Music Paintbox 

Manualen beskriver denne sidste 
del som en -free form method of 
composing-, og henvender sig isaer 
til de. der ikke er helt hjemme i de 
••rigtige" musiknotationer. Ideen er 
at bruge farver og former til at male 
en tone ind i nodesystemet. Nar 
man er tilfreds med resultatet, gar 
man tilbage til Music Editor Delen, 
hvor man kan se, hvordan komposi- 
tionen ser ud med -rigtige- noder. 



ULTISYNTH 64 

MUSIC PROCESSOR FROM 
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ULTISYNTH 64 

Fra Quicksilva kommer dette pro- 
gram der desvaerre kun kan fas pa 
kassette. og som det tager ca. 7 
minutter at loade 



Man har i dette programfundet 
en interessant losning paadgangen 
til nogle af SID-chipens »write only" 
regislre, her er der mulighed for pa 
skaermen. at vise alle lydpararnetre 
i indspilning/playback delen. 

Nar kassetten er loaded, bliver 
man prassenteret for en menu, 
hvorfra der kan vaslges folgende: 

Record, playback, load, save, 
compose, transfer notes og pretab. 

Record og playback muligheden 
giver el spasndende sksermbillede . 
hvor hver tast pa tastaturet synes at 
have en funktion. Skont det er be- 
svaerligt at benytte i begyndelsen, 
viser ULTISYNTH sig snart at vsere 
et ganske fleksibelt synthesizer- 
program. Ethvert aspekt af SID- 
chippen kan udnyttes, og en melodi 
med akkompagnerende rytme og 
backing kan laves, sa det kan redi- 
geres og gemmes pa band. I mod- 
sastning til flere andre programmer, 
har dette program intet nodesy- 
stem. 

Det er heller ikke nodvendigt at 
indspille i -real time-. 

Det er en virkelig god ting, at pro- 
gramme! giver mulighed for at ind- 
arbejde komponeret musik i ens 
egne programmer Nar man kompo- 
nerer en melodi med ULTRA- 
SYNTH , dannes programlinterne, og 
ved at POKE sig ind I SID-chipen, 
kan man spille melodien. 



Konklusion 

En konklusion pa denne artikel er, 
at man ikke behover at vaare noget 
musikalsk geni for at frembringe et 
stykke musik, der er vaerd at lytte til . 
Det er heller ikke nodvendigt at 
vasre verdensmester i programme- 
ring. 

Til programmorer vil jeg anbefale 
ULTISYNTH. forst og fremmesl 
fordi der i dette system er gode mu- 
ligheder for at lave de samme slags 
lydeffekter, man finder i professio- 
nelt fremstillede computerspil. 

Alligevel er min egen personlige 
favorit MUSIC STUDIO. Her vil jeg 
specielt fremhaeve |oystick-kontrol- 
len og de gode redigeringsfacilite- 
ter. 

Endnu tror jeg ikke. Kjeld Heik og 
Johnny Reirnar har noget at frygte 
fra min side, men med disse nye 
musiksystemer til 64'eren ved man 
jo aldrig. ■ 



Play it 



again Sam 



Af Ffemming Lerbeek 

Hvem husker ikke Homphry Bo- 

garts beromte ord: »Play it again, 
Sam«. I dag kan man (4 sin C64'er 
"til at sige de beromte ord, hvis 
man altsa har fdet tag I »Magic vo- 
ice speech module*- fra Commo- 
dore. 



Ud over disse Basic ord, er der 
mulighed for at programmere i As- 
sembly, men som saedvanlig - mk 
man desvaerre sige - er de medfol- 
gende manualer fra Commodore sS 
dariige, at del Oliver meget indviklet 
at finde ud a* meningen med det 
hele. 



Desvserre er det meget andre 
moduler. som gar i spaand med 
»Magic voice». Faklisk er det kun de 
spil, som Commodore selv laver. 
Kobler man f.eks. -Simons Basic« 
sammen med modulet, far man en 
fejlmelding, hvis man forsoger sig 
med SAY-kommandoen. Andre mo- 



Say it again. Jo. det er ngtig nok - 
din 64'er er begyndt at tale til dig. 
Ikke bare gennem de programmer, 
som Commodore har forberedt til 
det {som f.eks. »A Bee C's«, der er 
et staveprogram. samt »Wrzard ol 
wor* og -Gorf-), men programme- 
ret af dig selv 



»Say«' er losenet 

Det lille ord »say« far en ganske 
sserlig betydning med modulet. 
Med det kan man bruge de 23^ lor- 
programmerede ord ved f.eks. at 
sige: 




SAY -Pl_AY» : SAY »IT« SAY 

«AGAIN« 

eller 

SAY 223 : SAY 59 : SAY 175 

og taste RETURN. Naturiigvis 
kan man ogsa bruge ordren i pro- 
gramlinier. 




Modulet taler med en blod kvin- 
destemme og en til tider lidt pudsig 
udtale. Dette kan man ogsa aendre 
lidt pA. Man kan pynte pa SAY-kom- 
mandoen ved f.eks- at ttlfoje flertals 
"SSS<> eHer ved at skynde pa damen 
med RATE (1-10). 

Man kan ogsa bruge Speech mo- 
dulet sammen med anden software, 
nar man onsker det. Sa er del RDY- 
kommandoen eller NOTRDY, der til - 
bageholder talen, indtil en bestemt 
programfunktion er tilendebragt. 



Der hentydes til. at man kan lave 
ord (op til 4095 - 234), men der star 
ikke noget om hvordan de data, 
som danner ordene, skal se ud Pa 
samme made er der andre myste- 
ner i manualen. Udt trist. nar mo- 
dulet ellers fungerer godt 

Det skal dog retfaardigvis siges. 
at man nar langt med det indlagle 
ordforrSd. Der er alle tal, bogstaver 
og farver, de mest gasngse compu- 
terord og meget mere. 



duler starter bare og lader hant om, 
at man kan komme I kontakt med 
talemodulet. En ting er i hvert fald 
sikkert: talen bliver solo. 

En hastig konklusion m4 blive, at 
man med -Magic voice- nok far ta- 
lens brug, men ikke ret meget at 
bruge den til. ■ 
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MUSI IK DA 
128 



Af Flemming Lerbaek 
Var det nu POKE 54272 eller var 
det POKE 54273? Og skulle man nu 
AND'e. OR'e eller var det en 
PEEK? Forbisiret Ikke til at huske. 
Sa hellere flojte melodien til! 



Ja, nogen kan sikkert genkende 
siluationen. Jeg vil endda kalde den 
temmelig typisk, nar man pa sin 
VIC-2Q eller C64'er skal omgaes 
med SID-chip'en. En ret utaknem- 
melig opgave, der ofte er bade kom- 
pliceret og ttdsrovende for pro- 
grammoren og noget pladskras- 
vende i computererv 

Med den nye 128'erforholder del 
sig helt anderledes Den har nemlig 
et sset seerdeles gode lyd-komman- 
doer Ganske vist skat man stadig 
kende begrebeme i lydgengivelsen 
via SID 6581. altsa f.eks. ADSR og 
fillreringen - Ibbs mere om del andet 
steds i dette nummer - men nu er 
omgangen med lydbegreberne let- 
tet med nye Basic-ordrer. Her er sa 
de nye i alfabetisk rsekkefolge: 

ENVELOPE 

Envelope skrives som 
ENVELOPE nr.a.d.s.r.w.p 

Nr. stSr for et af de 0-9 forskelllge 
lydbilleder. 

A,d,s,r kan antage vserdierne 0- 
15, og star naturligvis for Attack. 
Decay. Sustain og Release. 

W star for pulsform. og kan 
hedde 0=trekant, 1 = savtasnder, 
2=firkant. 3 = stoj og 4 = ringmo- 
dulation. 

P star for pulssvingninger under 
w=2 (0-4096). De \t instrumenter. 




som gemmer sig bag nr -betegnel- 
sen, er all© forudindstillet i 128'eren, 
men gennem denne kommando kan 
man justere pa indstillingerne. 

FILTER 

Med denne ene kommando kan 
man indstllle de tre typerfiltre, altsa 
ho), mellem, eller lavtoneomradet 
FILTER fr.rf.mf.hf.re 

Her star fr for frekvenser, hvorfra 
filteret skal virke. 

Lf for lavfilter. mf formellerntone- 
filter og hf for hojtonefilter - alle med 
0 for ud ocj 1 for ind. 

Re star for resonans (0-15) 

PLAY 

PLAY ••Vn.on.tn,un,xn,node« er en 

kommando. som kan sammenlig- 

nes med PRINT kommandoen. Den 

styrer resultatel af lydbearbejdnin- 

gen. sa den omsaettes til et horbart 

output for menneskeoret. 

Vn star for Voice -nummer (1-3) 

On = oktaven (0-6) 

Tn = lydbillede (0-9) 

Un = lydstyrken (0-15) 

Xn = filter ind/ud (0-1) 

Noderne angives med engelsk 
notation dvs. C.D,E,F.G ( A og B. De 
kan ssettes med lasngde. pauser og 
betoning 



SOUND 

Sound s.f.d (.r.m.sc.w.p) er en -bil- 
ligudgave» af Envelope, idet den 
ogsa giver mulighed for at spille en 
lyd eller tonesammensffitning, altsa 
musik. 

S = stemme (1-3) 

F=frekvens (0-65535) 

D = varighed (i 1/60 sek. 0-32767) 

Resten af parameterne kan udela- 

des: 

R = hoj eller lavfrekvens (0 = hoj. 
1 = lav og 2=svingning mellem to 
omr&der) 

M = laveste frekvens (0-65535) 
Sc = skridtstorrelsen pa frekven- 
strinene (0-32676) 
W = waveform (0-3) 
P=pulsbredde 

TEMPO 

TEMPO x, hvor x star for tempoet i 
hvilken en enkelt node skal spilles 
(0-255). 

Forvalgsvaardien er 8, men ellers 
kan den egentlige vanghed i sekun- 
der udregnes efter formlen: 
varighed=19.22/x 

VOL 

VOL x er styrken. hvormed det hele 
skal udsendes. 0-15 er intervallet. 
hvor 0 er helt lukket 

Det var de seks kommandoer. 
som med stasrkt svingende kom- 
pleksitet kan bruges i et basicpro- 
gram, som den praasenteres i Com- 
modore 128'eren. ■ 
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Af Flemming Lerbaek 
Velkommen i den forundertlge ver- 
den af syntetisk muslk. Sadan star 
der i den lorste llnie af manualen 
til Data Becker-programmet 
"Synthimat S4. Det er laktisk ikke 
skrevet med et gran af overdri- 
velse. Programmet giver muslkal- 
ske vinger. 



Der findes musikere, som siger 
»orgeler har odelagt megel god mu- 
sik-«. Nar de slger del. mener de no- 
get i retning af, at syntetisk musik. 
som den frembringes pa syntetisk 
vis i disse elektroniske musikmaski- 
ner, er noget af det laveste. der fin- 
des. 

Der findes ogsa musikere og 
blandt dem flere og flere komponi- 
ster. som siger »elektronikken giver 
nye, uanede muligheder^. Nar de si 
ger det, mener de bl.a.. at det nu er 
op til musikerens fantasi - og ikke 
mindst i kompositions-ojemed - at 
skabe lyde. 

Grsenserne for lydbillederne er 
sa godt som forsvundet. Syntrvesi- 
zerne har spraangt rammerne bort. 

Hvad enten man kan lide musik 
frarnbragt af elektronik eller ej, er 
der i dag mange, som omgiver sig 
med den. Simple former findes 
f.eks, i ure, spil og desveerre ogsa 
t mange computere. Desvaerre, 
fordi de ofte giver sig ud tor at have 
sa og sa god lyd. Meget fa compu- 
tere - men dog flere og flere - har 
en iyd som Commodore 64'eren. 
Lyd-chip'en SID 6581 er pa hojde 
med mange asgte synthestzere. 
Programmet "Synthimat 64« inde- 
holder endda 

software-muligheder, som far 
den til at overslige de asgte lydma- 
skiner. 



SID 6581 tunes op 

At forsta lyd er fonfaardeligt svaert. 
Ikke uden grund finder man ofte in- 




tet eller sa godt som intet om SID- 
chip'en i bogerne om 64'eren. 
F.eks. heller ikke i den ellers ud- 
mserkede bog »Dus med Commo- 
dore 64/Plus 4- af Kurt Fnis Han- 
sen. 

Vi haber. at derte nummer af RUN 
vil kaste lidt lys over chip'en og 
dens muligheder, men programmet 
Synthimat 64 vil bestemt hjaelpe. 

SID 6581 har, som de fleste vel 
har fundet ud af. tre stemmer. Der 
er tale om en chip, som styres gen- 
nem tre oscillatorer - de sakaldte 
VCO'ere (Voltage Controlled Oscil- 
lator). Hver tor sig skal de have be- 
sked om de sakaldte ASDR-vasr- 
dier. Altsa Attack/Decay og Su- 
stain/Release. Hvad disse ting star 
for, kan du evt. $\k op din manual 
side 79-S7 ( hvor lyden forklares. 
Men der er mere endnu, som kan 
skabe lydbilledet. Der er et filter 
VCF (Voltage Controlled Filter) og 
en forstserker til lydstyrken VGA 
(Voltage Controlled Amplifier). 

Som det pointeres i Synthimat- 
programrnet, er det egentlig mere 
pa sin plads at kalde de tre oscilla- 
torer for DCO'ere (Digitally Control- 
led Oscillator) rem for VCO'er. idet 
de styres digitalt og ikke med 
spsendingsforskelle. som det var til- 
faaldet I de forste af f.eks. Moog- 
synthesizerne. 



Nye muligheder 

Hvor manualerne holder op med at 
fortaalle om SID'ens fortrseffelighe- 
der, tager programmet Synthimat 
54 nu fat. Der bydes pa flere la?kke- 
rier, for selvfolgelig er der lavet en 
nem made a! styre de ovenna3vnte 



ting pa gennem en stor menu - 
mere om det senere. 

Man kan spitle op til tre forskel- 
lige toner samtidig, hvilket altsa gi- 
ver mulighed for at spllle akkorder, 
eller treklange om man vil. Disse to- 
ner kan spilles pa enten et baskla- 
viatur eller et soloklaviatur. Begge 
er vist pa skarmen. Man kan ogsa 
dele de tre stemmer mellem de lo 
klaviaturer. Bas-tonerne bliver altid 
test forst. nar tasterne ateses af 
64'eren. Bassen er lagt i de to un- 
derste raakker taster, mens solo-in- 
strumentet er lagt i de overste rask- 
ker. 

Via softwaren er der mu lighed for 
at udnytte heie otte oscillatorer som 
LFO'er Man kan ogsa bruge pro- 
grammet som filter for stereoan- 
lasgget gennem ben 5 i audio/video 
stikket. Filteret kan tilpasses 8 for- 
skelhge afskaarmger. 

Man kan gemme op til 256 for- 
skelhge klangindstillinger i sin com- 
puter. Ikke nok med det, for pro- 
grammet tillader, at man pa hver di- 
skette foretager op til 9 forskellige 
klangindstillinger med hver op til 
2&6 mulige kombinationer. Altsa 
f.eks. forskellige musikinstrumenter 
pa en file (SR1 ), forskellige reallyde 
f.eks. toge, fly, vandp|ask pi en an- 
den file (SR2). 

Jeg vil dog lige komme med en 
kritik af programmet pa dette punkt. 
Det er meget fint, at der er sa 
mange muligheder. Langt flere end 
man kan forvente til den pris, men 
hvorfor har programmoren kun lagt 
fern - siger og skriver fern solle lyd- 
billeder ind i SRI. Hvorfor ikke 200 
kendte instrumenter? En skidt lille 
ting! 
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Der ud af 

Til gengasld er der lagt ni mere etler 
mindre - rnest det sidsle - velspil- 
lede melodier ind i de ni mulige di- 
rekte-filer. Hvad er sa en direkte- 
file? Jo, der er samaand rnulighed 
tor at spille en melodi ind direkte pa 
en disk! Hvad siger du sa? 

Man kan spille en melodi - lang 
eller kort - og disken optager hver 
en pause, node eller mish/d, som 
man si paforer den sageslose 
64'er. Til gengseld skal man selv 
laegge ore til. nar den afspilles fra 
disken. Alls de indstillmger, der skal 
til pa de forskellige niveauer f,eks 
ASDR, filtre osv. er optegnet. Der er 
ogsa rnulighed for at skifte diskette, 
sa kan du have sa mange melodier 
du vil, men kun ni pa hver diskette. 

Jeg har i ovrigt provet program- 
met med EPYX Fast Load Modul. 
Det fungerer tint, og tiderne for de 
forskellige operationer er nedsat. 

Det er altsa bare at spille los og 
komme der ud af! 

Konklusion 

Hvis man gerne vil i gang med at 
bruge sin SID-chip til mere end et 
blip, er Synthimat 64 et fornuftigt 
bekendtskab. Dette program abner 



alle porte til SID'en, det har fine mu- 
ll gheder for -play back-, og er for- 
trinligt til pa samme tid at se og hore 
SID-indstillingerne. 

Synthimat 64 er ikke et musikpro- 
gram. Det omsastter f.eks. ikke no- 
der til lyde. Dels storste svaghed er 
efter min mening. at de musikse- 
kvenser man far fremstillet, ikke kan 
bruges i andre programmer, men el- 



lers er det alle pengene vasrd Ma- 
nualen er nmelig detaljeret og over- 
skuelig, 
Navn. 

Synthimat 64 
Firma/importor; 

Data Becker/Nordic Computer 

Software 

Pris: kr. 498,00 



lige til at taste ind. Denne gang dog 
ved hjaelp af en assembler. 

Dernaest fortasller bogen om en 
raskke mulige brugsformer af chi- 
p'en i 64'eren. Man kan f.eks. for- 
binde sin computer med sit stereo- 
antasg. Det giver selvfolgellg en 
bedre tone pa det, som kommer ud 
af SID'en. men samtidig abnes for 
mulighederne af en filtrering af det 
signal, der sendes ind i en af stem- 
merne pa SID 6581. 

Et musikleksikon med udtryk fra 
bade musikkens- og computerens 
verden. er der ogsa blevet plads til . 
Bogen sluttes med et par melodier, 
som man med nmelig stor talmodig- 
hed kan fa ind i 64'eren. Jeg synes. 
det vil vaere arbejdet vaerd. 

Under alle omstasndigheder er 
bogen et meget rimeligt bekendt- 
skab. hvis man vil vasre med pa no- 
derne. 
Titel: 

Das Musikbuch zum Commodore 

64. 208 sider. 
Forlag : 

Data Becker/ Nordisk Computer 

Software. 

Pris: Kr. 199.00 



MED PA NODERNE 

Selv om Commodore 64 indeholder 
en meget professionel synthesizer, 
er det ingen garanti for. at der ogsa 
kommer vellyde ud af et naermere 
bekendtskab med SID-chippen. De 
mange PEEK og POKE-komman- 
doer kan hurtigt fore til et kreativt 
kaos, som formentlig kun ville 
glasde en Niels Viggo Bentzon, mdtil 
han fik at vide, at det hele var et 
tilfaalde. 

Mej. der ma styr pa galskaben, og 
det er svasrt nok med SID-chippen. 
Den rummer et utal af muligheder - 
se andet steds I dette nummer - og 
dens programmering er alt andet 
end ukomplicerei. Ikke mange ste- 
der er der hjaelp at hente. hvis man 
vil vide mere om mulighederne. Af 
og til dukker der en artlkel op om 
emnet. men helt fyldestgorende er 
de nasppe. Det er derimod en Data 
Becker udgivelse »Das musikbuch 
zum Commodore 64«. 64'er musik- 
bogen, som jeg vil tillade mig at 
kalde den, gar langsomt frem. Den 
giver forst et indblik i de bevaeg- 
grunde. der skal til for at beskaafttge 
sig med syntetisk musik. 




Gennem el par Basic-eksempler 
finder man ud af mulighederne for 
programmeringen af musik indenfor 
Commodore Basic - og vel \sser de 
begraensntnger, der ssettes. Gen- 
nem en talmodig POKE'n til diverse 
adresser i SID-regtstrene nar man 
de ret flotte resultater samtidig 
med, at man stifter bekendtskab 
med mulighederne i SID 6581 

Sa gar man over til programme- 
ring i Assembler. Det abner nye mu- 
ligheder for hastigheder, der tillader 
udnyttelsen af alle tre stemmer pa 
en gang. Et eksempel gennemgaes 
minutiost. og som allid er der lister 
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Skolen og 
EDB 




Al Henning Randmose 
Den senere tlds megen debat om 
skolernes undervlsning i data- 
laare har vaeret tidt forvirrende. 
Alle. uden undtagelse, er enige 
om, at der skal undervises i faget, 
og det er da ogsa sikret ved lov. 

Der er ogsa enighed om, at un- 
dervlsning i programmering skal 
forega i COMAL-80, men sa horer 
enigheden ogsa op - hvordan der 
skal undervises, hvor meget der 
skal ofres, det er stadig 1 stor grad 
op til den enkelte skole, kommune 
og amt at bestemme. 

Det vil sige. at selvom det nu er 
vedtaget, at der skal vsere undervis- 
ning i dataleere i savel folkeskolen, 
de private skoler og i gymnasierne. 
sa vil kvallteten af undervisningen I 
de forste mange ar vaare afhsengig 
af, hvad der det enkelte sted bliver 
ofret pa hardware, samt om der pa 
den enkelte institution er laarere, 
der i deres fritid har interesseret sig 
for EDB, eller ej. 

Uden i ovrigj at tage stilling, vil 
jeg ganske kort belyse, hvad jeg 
mener med, at kvaliteten af under- 
visningen i meget hoj grad er af- 
hsengig af, om en lasrer har EDB 
som hobby eller ej. 

Uddannelsen af Iserere 

Ifolge den nye Iseseplan er det f eks. 
meningen, al alle laarere pa vore 
gymnasier skal undervise i data- 
lasre, uanset baggrund iovrigt. De 
skal blot gennemga et 40 timers 
kursus, hvor de lasrer om compute- 
rens indflydelse pa. vort samfund. 
hvordan man kan integrere det nye 
vaarktoj i undervisningen, og hvor- 
dan man skriver programmer. Efter 
at have gennemgaei dette kursus 
mener de ansvarlige myndigheder. 
at laarerne er i stand til at gennem- 
fore et 30 timers kursus pk gymna- 
siet. 

Jeg bade agter og serer vor lae- 
rerstand, men kan alligevel ikke lade 



vssre med at sparge, om det ikke er 
at forlange bare en lille bitte smule 
for meget. Lad os tage et par andre 
fag, der er ligesa komplekse som 
EDB er i bredeste forstand. lad os 
tage historie og matematik. 

Hvis nogen, uden at have madt 
op med et rimeligt godt forkend- 
skab til datalaare, og efter at have 
gennemgaei et 40 timers kursus, er 
blevet lagligt velfunderede, er der 
noget gait. Ja. sa vil jeg mene, at der 
ved vore seminarierog universiteter 
sker et frygteligt resourcespild. for 
sa kan man ogsci uddanne en histo- 
rieleerer og en mate mat iklasrer pa 
40 timer. Hvis det ikke er tilfaeldet, 
sa vil jeg pasta, at man heller ikke 
kan uddanne en data-lasrer sa hur- 
tigt. 

Hvis vi ikke skal sakke agterud i 
den teknologiske udvikling, sa er 
der nod til at folge nogle storre be- 
villinger med onsket om en bedre 
forstaelse og udnyttelse af den nye 
teknik. 

Eksport af 

undervisningsprogrammer? 

Jamen star det nu sa gait til? Det 
mener jeg det gor. og det vil jeg 



illustrere det med et eksempel. 

I et interview i TV-avlsen blev un- 
dervisningsminister Bertel Haarder 
spurgt, om der ikke manglede til- 
straskkeligt gode programmer, for 
at undervisningen kunne blive god 
nok. Det svarede han ja til og tllfo- 
jede sa. at de jo skulle starte et 
sted, og de havde valgt at anskaffe 
udstyret forst, sa der noget at 
skrive programmerne pa. Her ma 
det vaere underforstaet, at det 
skulle gores at laererne. evt. i sam- 
arbejde med et bogforlag, og han sa 
en fremtid, hvor Danmark ligefrem 
eksporterede undervisningspro- 
grammer til den ovrige verden. 

Jeg onsker sandelig det samme, 
men jeg ved ogsa, at der. bare for 
at lave et heederllgt computerspil. 
krseves arbejde af hojt uddannede 
programmorer i 2 til 4 mandeSr. 
Disse programmorer har brugt ar af 
deres liv for at blive sa dygtige. at 
de kan lave spil andre gider kobe, 
de arbejder fuldtid med at program- 
mere. Og igen, al aere og respektfor 
lasrerstanden. de er dygtige pseda- 
goger, hvad ovenneevnte program- 
morer ikke behover at vaere, og de 
har valgt et eller andet speciale 
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f.eks. dansk, fordi del har deres 
store interesse Hvad kan fa nogen 
III tro, a! de i deres fritid. ulonnel. vil 
og kan sastte sig hen og lave store 
og professionelle undervisning- 
sprogrammer. 

Der findes Iserere rundt omkring 
i landet, der interesserer sig for 
EDB. og der findes dem. der i deres 
fritid har skrevet nogle program- 
mer, som kan bruges i undervisnin- 
gen, og hvis de samme lasrere un- 
derviser i datalasre. er de da ogsa 
meget velkomne til at bruge deres 
egne programmer, men de far Ikke 
en krone ekstra for det, og det siger 
sig selv. at det ikke ligefrem er op- 
muntrende. Det kan godt vajre, at 
deres programmer ikke er lige pro- 
fessionelle, men jeg tvivler dog pa. 
at de kunne skrives af en. der kun 
har vseret pa et 40 ttmres kursus. 

Som i alt andet, sa skal man 
kunne kravle, for man kan ga. og 
hvis de, der dog forsoger, ikke bli- 
ver opmuntret pa en eller anden 
made, ja sa er det ikke stkkert at de 
laerer at ga. og sa er eksporten af 
undervisningsprogrammer lidt laan- 
gere ude i fremtiden. 

Nu skal man dog ikke tro, at der 
slet ikke findes undervisningspro- 
grammer, for det gar der, og afhasn- 
gig af compute rfabhkat. Der findes 
endog mange, men dem vil \eg 
komme ind pa senere. 



Undervisnlngen i praksis 

Da jeg skulle skrive denne artiket. 
ville jeg naturligvis gerne ud og tale 
med nogle fserere, der underviste i 
datalsere. for at se og hore hvordan 
de greb sagen an- 

Det forste problem jeg her stodte 
pa, var at finde nogen, der havde 
erfaring (ra undervisning. De skulle 
jo nsesten allesammen til at slarte 
f ra dette skolear. Efter et par forgaa- 
ves forsog, kontaktede Jeg JM-Data 
i Solrod. da jeg vidste, at Jorgen 
Malov havde solgt en del Commo- 
dore 64 systemer til forskellige sko- 
ler. Han sendte mig en lisle over 
nogle Iserere, der efter hans mening 
vidste en del om EDB. et par disket- 
ter med programmer, som han leve- 
rede gratis til de skoler, der kobte 
deres computere gennem ham. 

Pa den made fik jeg kontakt med 
Ole Jorgensen, der p& Damager 
skole i Mosede underviser i data- 
lasre og fysik. Da jeg kom derned, 
skulle han netop have en 10. klasse. 
der skulle have deres forste time i 
datalaere, Jeg fik lov at sastte mig 
bagerst i klassen og overvasre hans 
introduktion af, hvad klassen skulle 
Isare, og hvordan han havde tasnkt 
sig, de skulle laare det. I data-rum- 
met stod 6 Commodore 64 forbun- 
det gennem en Vic-switch til en di- 
skettestation og en printer, og der 
var ogsa 3 stk. Commodore 4016 




med en printer. For at kunne an- 
skaffe sa mange computere var 
skolen gaet i samarbejde med ung- 
domsskolen, som sa brugte udsty- 
ret om aftenen. 

Det var tydeligt. at faget inter- 
esserede eleverne, hvoraf halvde- 
ien var piger. Der var 3 ud af ialt 11 
elever, der havde en computer 
hjemme (alle Commodore 64)_ Af de 
3 var den ene en pige, og mon ikke 
al den snak om, at teknik og compu- 
tere ikke interesserer piger, er lidt 
overd revet. 




Programmet cfer blev v&k. 



Efter kun tre kvarters indledning 
var det lykkedes Ole Jorgensen at 
forklare s& meget, at eleverne selv 
skrev deres forste program, altsa 
ikke tastede ind efter en bog eller 
noget skrevet pa tavlen, men skrev 
det selv, De havde kun faet forkla- 
ret. hvordan det skulle opbygges - 
det var ret imponerende. 

Da jeg efter timen talte med Ole 
Jorgensen. fortalte han mig. at han 
havde arbejdet med programme- 
ring 1 10 ar, at han ved siden af sko- 
len havde et lille firma, hvorigennem 
han solgte programmer skrevet i 
Comal 80 til mindre erhvervsdri- 
vende, og da han ydermere var 
landmand. da ogsa programmer, 
der beregnede nodvendig god- 
ningsrnaangde til marker. 

Med de oplysninger in mente, var 
det nernmere at forsta. at han sa 
hurtigt og nemt kunne formidle et 
budskab og fa det forstaet. som jeg 
netop havde overvaeret. Som ud- 
dannet psedagog, vidste han jo, 
hvordan man bedst og mest for- 
staeligt forrnidler et budskab, og 
fagligt var han i datalsere saerdeles 
velfunderet. 

Pa Damager skole valgle ca. 1/3 
af eleverne datalaare, og efter hvad 
han vidste, var det nogenlunde nor- 
mals Han var sasrdeles godt tilfreds 
med, at de havde Commodore 64, 
da dens Comal, efter hans mening 
var den bedste (er ogsa kobt af 
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► IBM). Privat arbejdede han ogsa 
selv l Comal 80. og han roste leve- 
randoren. JM Data, for deres atter- 
service. Hvis der var et problem, 
sorgede de omgaende for at lose 
det. og hvis en maskine brod ned, 
stillede de gratis en lanemaskine til 
disposition 

Han fortalte videre at eleverne, 
nar de var leerdige, ville have faet et 
vist kendskab til programmering. til 
lagerstyring med EDB (et at hans 
egne programmer), de ville have 
provet ETB (elektronisk tekstbe- 
handling) og forhabentlig ogsa 
elektroniske regneark (spreads- 
heet). At hans elever ville fa det ge- 
nerelle kendskab til forskellige ting, 
virkede trovaerdigt. da han selv be- 
herskede de forskellige tekniker - 
men igen, hvordan vil de elever 
vaare stiHet, hvor Isereren kun har et 
40 timers kursus at bygge p&. 



Servicenlveauet 

Hvad er det s5 for programmer, der 
star til radighed for skolerne? Jeg 
havde faet tilsendt to disketter fra 
JM-Data til Commodore 64, men 
ringede alligevel til Commodore i 
Horsens for at hore om der var flere, 
eller om de havde nogie nye under 
udarbejdelse. I forste omgang var 
rette vedkommende ikke tilstede, 
og )eg ringede derefter til Regne- 
centralen. da der ogsh stir en del 
Piccoliner rundt omkring i landet, 
men her var der blank afvisning. 
Hvis jeg ville vide noget mere om 
deres programmer, kunne jeg kobe 
dem - sddan\ 

Mens jeg sad og funderede over 
Regnecentralens sales promotion, 
ringede Mikael Holm fra Commo- 
dore og jeg fortalte. hvad jeg havde 
faet fra JM-Data. og spurgte om de 
havde flere programmer, de udleve- 
rede gratis til de skoler, der havde 
kobt Commodore 64. Jeg fik deref- 
ter tilsendt yderligere to disketter 
plus en tang liste over programmer, 
der var i stobeskeen. 

Fordi Regnecentralen har et surt 
rnenneske siddende pa en post, 
hvor han maske ikke burde vsere. 
skulle det ikke forhindre mig i at fa 
lidt at vide. Jeg vidste. at Altered 
Amtsgymnasium havde anskarfet 9 
Piccoliner og her pA det seneste 
ogsa en enkelt Commodore 64. 

Jeg talte med Karsten Dam. der 
underviser indenfor faget (havde 
datalaere som tilvalgsfag under ud- 





Dataizere pa AmagersHole. 



dannelsen). Han underviser Ind 
imellem pa det beromte 40 timers 
kursus. Pa Allerod Amtsgymnasium 
er det meningen, at man med tiden 
vil integrere brugen at computere t. 
undervisningen. sa laererne kan 
bruge til anskueliggorelse af tin- 
gene i de enkelte fag. 

Af fserdige programmer havde de 
en geografi-database. der bl.a. in- 
deholdt nogel om tandbrug og be- 
folkningstal. I et fransk-program 
(Skattejagt) skulle eleven boje for- 
skellige ord for at komme videre. 
Amtscentraten har ogsa. lavet et 
semi-tekstbehandlingsprogram, 
der hedder »>Skriv«, det giver en ide 
om ETB. Desuden er det lavet en 
del s map rog rammer, hvoraf nogle 
bruges l samfundsfagene. Inlegre- 
ring i undervisningen er endnu ikke 
sket, da deres Piccoliner ikke er 
mobile. Der er ikke gratis lanema- 
skine til raclighed under reparation, 
og der var en del utilfredshed over, 
at servicen var tagt ud til forhand- 
lerne, da Isererne, nar der var soft- 
ware-problemer. alligevel altid 
endte med at matte kontakte Reg- 
necentralen, og da altid pr. telefon. 
da de ikke har nogen konsulenter. 



Programmerne 

Nu til de programmer, skolerne far 
stillet gratis til radighed, nar de har 
kobt Commodore 64. 

Der er alt for mange til at jeg kan 
komme ind pa hvert enkelt pro- 
gram, sa derfor vil jeg forst bare 
neevne navnene, og bagefter omtale 



dem. jeg synes er de bedste. Jeg 
kan dog sige sa meget. at der er 
ingen, jeg synes er absolut darlige, 
men der er et par stykker. man godt 
kunne undvasre. 

Disketterne horer sammen i par, 
en med Comal programmer og en 
med Basic programmer Til hvert 
par disketter horer et hefte, der om- 
taler programmerne, fortaeller hvil- 
ket niveau de er beregnet for, og 
det starter helt nede fra bornehave- 
klasserne og op til 10. klasse ni- 
veau. Heftet giver ogsa forskellige 
forslag til undervisningsforlob, og 
det er ligeledes frit for skoien at ko- 
piere programmerne, sa laenge det 
er til eget brug. En del af program- 
merne kan listes ud pa printer, sa 
eleverne kan se. hvordan de er byg- 
get op - noget de kan have megen 
glaede af. nar de skal laere at skrive 
deres egne programmer. 

Alle disketterne starter med et 
program, hvorfra man vselger de fle- 
ste andre programmer. Pa disket- 
terne ligger folgende programmer: 



Comal 1 

Biologimenu (om sseter) 
Registre (simulerede off. registre) 
Stavetraaning I forsk. sprog 
Skoleskema 

Ur (24 timers digital og viser-ur) 
CPR-nummer (kontrol af aegthed) 
Koptprogram 

Dump802pak. (aendrer MPS802 
printer til grafisk printer) 



fortsaattes side 62 
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"Den f loppy er bare deruda..." 




Nar du selv konstruerer programmer, laver spil og har fart pa, 
er det vigtigt at disketten holder hvad den lover. Det gor Maxell . 
Disketten er antistatisk behandlet og kan aftastes mere end 10 
mill, gange uden kvalitetsforringelse. 
Maxell: det rigtige valg, der lever op til dine krav. 
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Af Flemming Lerbaek 
Ogsa 19S5 har faet sin computer- 
revolution. AMIGA, hedder Com- 
modore produktet, som eksperter 
har bedomt til at vaere et nyt gen- 
nembrud for computerteknlkken. 



Mens de fleste af os gar og ven- 
ter ut&lmooigt pa Commodores 
128'er. er en anden stjerne dukket 
op pci computerhimmelen. Der er 
ogsa de eksperter. der siger. at 
dens glans er s& srralende, at Ami- 
gaen rneget let kan komme !il at 
overskygge 128'erens betydning pa 
hjemmecomputeromradet. 

Amigaen er en computer, som vil 
sastte nye grasnser for disse vesrk- 
tojers formaen: 16 bit CPU, 256K 
RAM som standard. 192K ROW. 80 
tegn, grafikoplosning pa op til 
400x640 punkter, 4096 farver, reel 
animation, musstyret operativsy- 
stem. 4 stemmig stereo synthesi- 
zer. IBM kompatibe! og meget. rne- 
get mere. 

Men Amigaen ma da koste en 
formue? Ne), egentlig ikke • forud- 
sal priserne leegges pa samme ni- 
veau som i USA - bliver den sa lav 
som omkring 17-18.000 kroner. I 
USA er prisen (1 .295 dollar) fastlagt 
i og med, at computeren har vaeret 
til salg i nogle fa uger. Nogle at de 
ting maskinen kan, f.eks. animati- 
onsmulighederne. har kun kunnet 
faes i samme kvalitet til over hun- 
drede tusinde kroner. 

Amigaen vil naappe kunne faes i 
Danmark for engang i del nye ar. 
Der er endnu ikke fremstillet maski- 
ner til det europseiske marked, idet 
man ikke har faet lost problernerne 
omkring billedbehandlingen efter 
de europasiske - minus Frankrig - 
normer. Amigaen er betydelig mere 
avanceret p6 netop dette punkt end 
nogen af sine forgasngere, derfor 
kan man ikke hente nogen brugbare 
losninger derfra. Amigaen er nemlig 
I sland til, at tage et billed ind i hu- 




komrnelsen, behandle det videre og 
gengive det. mens beregningerne 
foregar i superhurtigt tempo. Sa 
hurtigt, at sekvenserne gengives 
som animerede billeder. 

I lobet af kort tid vil Commodore 
fa den forste maskine her til landet. 
Den vil blive vist frem for presse og 
andre interesserede ved en speciel 
iejlighed. Sa vil RUN naturligvis 
ogsa vsere pa pletten. Her er imid- 
lertid, hvad vi har kunnet fa ud af 
Commodores folk indtil nu. 



Hardware 

Der bliver sat mange rekorder. nar 
man sammenligner pris og form&en 
omkring Amigaen. Hele herligheden 
styres af en 68000 Motorola chip. 
Det er en 16 bit CPU. som drives 
frem med en taktfrekvens pa 
7,15909 MHz. 256 Kbyte RAM er der 
i grundmodellen. men den kan udvi- 
des til 512 ved hjselp af et tndstiks- 
modul t f rontpladen. lalt kan maski- 
nen styre op til 8.5 Megabyte, der 
enten kan vasre RAM elier ROM. 
Operativsystemet er pa 192 Kbyte 
ROM. Forelobig indlades - bootes - 
alle 192 Kbyte Ind i et RAM-omrade, 
som derefter spserres af og funge- 
rer som ROM Selv under reset er 
omradet lukket, og skal tkke lades 
ind party. 

Selve systemet er delt i tre enhe- 
der. Et tastatur med 89 taster, bl.a. 
separate numeriske taster, 10funk- 



tionstaster og forskellige alternate, 
help, esc, amiga og separate cur- 
sortasler. Farverne er antikhvid 
med funktionstasterne i let gra 

Tastaturet er imidlertid nasppe 
det mest brugte redskab. nar man 
skal bruge sin Amiga i praksis. 
Computeren er nemlig forsynet 
med et meget staerkt operativsy- 
stem, der kan betjenes ved hjaslp af 
en mus med to knapper. 

En tredje enhed er selve compu- 
terboksen. Den er ligeledes antik- 
hvid og rummer bl.a. en diskenhed, 
nemlig en 3 1/2 tomme SONY-li- 
gende diskstation. Den rummer 
hele 880 Kbytes formatteret. og fun- 
gerer dobbeltsidet. Computerbok- 
sen har desuden pa 1 forsiden den for 
omtalte abning - normalt gemt bag 
en dsekplade - til 256 Kbyte ekstra 
RAM. PS siden har den to joystick/ 
mus indgange. samt en port, der 
korer lige nd i databussen. Ami- 
gaen fungerer i det hele taget som 
et »abent system" med meget stor 
fleksibilitet. Pa bagsiden er der for- 
skellige ind- og udgange. Stereo 
ind- og output, Centronics parallel 
printerport, supplerings diskport - 
med stromforsyning af op til to en- 
heder. Video TV, RGB. 



Nye veje 

Det lyder alt sammen meget traditi- 
onelt. og det er da ogsa forst nar 
taten falder pa den rwkke speciai- 
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chips, der findes i Amigaen, at tin- 
gene tager fart. BogstaveSig talt, for 
Amigaen er omkring li gange sa 
hurtig som f.eks. Machintoch'en 
Det som giver hastigheden, er den 
sakaldte DMA (Direct Memory Ac- 
cess), altsa en direkte fordeleren- 
hed til hukommelsen. Da Amigaen 
arbejder med "interrupt*- pa aile 
funktioner, dvs. ingen tidsspilde for 
68000 enheden med at se efter, orn 
ting og sager sker netop nu, men 
kun afbrydelser, nir noget sker. Re- 
sultat: oget hastighed. Foruden 
multitasking spiller tre andre chips 
spiller ogsa en rolle for Amigaen's 
berommelse. 

Multitasking - altsa evnen tit at 
kore flere programmer samtidig 
uden at de har indfiydelse pa hinan- 
den, endsige sinker computeren pi 
nogen made - en vassentlig rolle for 
det samlede indtryk af hastighed. 

De tre specialchips hedder Ag- 
nus. Daphne og Portia. 

Agnus Klarer den overordnede 
styrmg af hukommelserne. Arbejdet 
Wares i samarbejde med en co-pro- 
cessor (kaldes Copper) og ikke 
mindsl en enhed i Agnus selv, den 
sakaldte Blitter (Bit-image control- 
ler), der flytter rundt med hukonv 
melsen med lysets hast. 

Desuden kan denne chip flytte 
rundt med genstande pa skaarmen, 
tegne linjer og fylde omradet med 
en farve Noget meget nyttigt. nar 
talen er om animation. 

Daphne er det egentlige animati- 
ons-chip. Det samarbejder med Ag- 
nus og fylder sa pa af egne oplys- 
ninger om f.eks. farve og prioritet pa 
skaBrmen. Og mens vi er ved det. 
Farvernes antal er 4096 pa en gang. 
Normalt dog kun 32 farver ad garv 
gen op til en oplosning 200x640, 
hvor man ma nojes med 16. 
400x640 skaermoplosningen faes 
ved at kombinere to billeder, men 
der skal en god skeerm til at se 
denne oplosning overhovedet. 
Commodore selv har endnu ingen 
skasrm. menes det, 

Portia tager sig. som navnet an- 
tyderaf ind/ud operationerne Ogsa 
den betjener sig af direct acces til 
hukommelsen, hvilket betyder 
speed. Den tager sig ogsa at andre 
ting f.eks. lyden. der er frembragt i 
en fire kanals digitalstyret - og der- 
for - professionel synthesizer, men 
lukkes ud til omverdenen som to 
gange stereo. 

De tre chips er sa spaandende. at 



vi uden tvivfi vil vende tilbage til dem 
gang pa gang i den kommende tid. 
En omtale som denne vil kun blive 
meget flygtig i torhold til tre sa 
spaendende nyskabelser. 

F.eks. giver en af de fern modes, 
maskinen kan kore i, fremstillingen 
af en »dua!-playfie!d« skserm, hvor 
man kan have to vicft forskeilige op- 
losninger og billeder pa skasrmen 
samtidig. Vel og masrke over hinan- 
den - altsa i flere planer. Ulempen 
ved alle disse hojoploste skaerme er 
forbruget af hukommelse. Den kan 
dog begreenses vsesentligt ved at 
undlade at bruge alle 32 farver, men 
forbruget af RAM er under alle om- 
stsendigheder enormt. En oplos- 
ning pa almindelige 320x200 og 32 
farver bruger 40 Kbyte, mens en ho- 
joplost 400x640 med 16 farver bru- 
ger 128K! 

Sprites har maskinen naturligvis 
ogsa. Der er to slags. En almindelig 
Vsprite, der er 16 punkter bred og 
lige sa hoj som det onskes. Den kan 
have tre farver, og kan bevaege sig 
meget hurtigt. 

Langsommere, men ogsei meget 
mere farverig, er Blitter Objects, de 
sakaldte Bobs. De styres af soft- 
ware, men har ingen begraensnin- 
ger i storrelser og farver. 

Skrift tegnes pa skaarmen og det 
giver store muligheder for alskens 
fiksfakserier med hensyn til storrel- 
ser og udformning. Der er tre nor- 
male tegntilstande, nemlig 40, 64 og 
80. 



Softwaren 

Softwaren til Amigaen er mindst lige 
sa spasndende som hardwaren. Op- 
erativsystemet er noget helt nyt. 
Det betjener sig af en raskke win- 
dows, altsa felter pa skaBrmen, hvor 
man vaalger sig frem via musen og 
dens to taster. Programmet kaldes 
••Intuition" og indeholder bl.a. ogsa 
en helt nyskrevet DOS kaldet Ami- 
gaDOS. Udviklingsarbejdet har nse- 
sten udelukkende vaaret lavet af fir- 
maet Metacomco, der ogsa har la- 
vet f.eks. QL-programmer. 

Amigaversionen er bygget over 
den originate Tripos fra Cambridge 
Uni i de tidlige 60ere. Det er et asgte 
multitasking-system, men staarkt 
rnoderniseret i forhold til sit ophav 
og specialdesignet til 68000 CPUen. 
Der arbejdes ogsa med en Pascal- 
version og en Lisp, som ikke auto- 
matisk folger med Amigaen. Det gor 



derimod en meget stasrk macro-as- 
sembler og DOSen. 

AmigaDOS arbejder med det 3 
1/2 tomme diskdrev og de even- 
tuelle udvidelser, f,eks. en softwa- 
restyret version af IBM-systemerne 
MS-DOS pa en 5 1/4 tomme disk, er 
meget anderledes end det. Com- 
modores brugere er vant til. Der er 
f.eks. hverken sekventielle eller re- 
lative filer, men kun blok-operatio- 
ner. De er til gengaeld mullge at 
spore bade fremad og bagud. 

Den software, som leveres med 
er i USA; Amiga DOS, Voice Synt- 
hesis Libary. ABasic. Tutorial og Ka- 
leidoscope. 

Voice Synthesis Ubary har for- 
uden en kvindelig og mandfig 
stemme, ogsa mulighederne for at 
danne ord pa dansk. 



Kun begyndelsen 

Amigaen som den er prassenteret i 
USA, er kun begyndelsen , Den rum- 
mer langt mere end her beskrevet. 
og alligevel er det kun version 1 . Der 
vil formentlig vaare tale om en ny 
serie under betegnelsen Amiga. 

Til den vi har set en flig af nu. er 
der ved at blive udviklet en raskke 
spasndende tilbehor. Via en sakal- 
det »frame-brabler» skal man kunne 
arbejde med et billede taget ind via 
f.eks. Video, billedplade eller ka- 
mera. Med en Genlocker skal man 
sa kunne bringe billedet tilbage pa 
videosignalet som et mix af de to 
signaler. Der er tale om et eksternt 
lager - et fastpladelager - pa 20 
Mbyte og en tilsvarende kapasitet 
pa en tapelosning. Sammenfat- 
tende kan man sige, at det er en 
lavine af computermuligheder, der 
er starlet med Amigaen. 

Der er sikkert god grund til at 
vente pa maskinen, hvis man skal 
bruge den til omrader som f.eks. 
CAD/CAM og animation Samtidig 
vil dens hastighed og dens rnulig- 
hed for at kore MS-DOS give den et 
vaeld af gammelkendte og vetreno- 
merede softwares fra starten. Men 
mest spsendt er jeg pa at se, hvad 
fantasien kan saette tgang. godt 
hjulpet af maskinens nye og upro- 
vede muligheder. m 
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FASTLOAD 



Af Tor Engebakken 
Forog hastigheden pa din 1541 
med op til 5 gange!!! 




Etter al kassettespilleren fik sine 
mangfoldige TURBO-loader, be- 
gyndte fidusen ved at anskaffe en 
diskettestation at skrumpe ind. 
Selvfolgelig er del godl at fa et 
bedre system til sine programmer, 
men er det vserd at betale ca. 2.500 
kroner ekstra for en diskettestaiion, 
som faktisk er langsommere end 
kassettespiHeren? 

Den gode, gamle 1541 er har al- 
drig vseret kendt for sin hurtighed, 
og da TURBO'erne kom pa marke- 
det, var der nok mange, der trak pa 
smllebandet over den hjaelpelose 
overforingshastighed til det sa- 
kaldte -diskdrive-. Det er uden tvivi 
en stor fordel ved diskettestario- 
nen, at man har en >»hurtig«< tilgang 
til data pa hele disketten, men i de 
fleste tilfgelde er vi mest inter- 
esseret i, at LOAD'e et program pa 
en sa hurtig made som muligt. og 
der kan en kassettespiller vel vasre 
lige sa god? 



Hurtlgere kopierlng 

I de fleste tilfceide kunne man tore 
at leve med -skitdpadden". Proble- 
met maarker man imidlertid i sserlig 
grad. nar man skal lave en fuldsteen- 
dig kopi af en diskette. Vel findes 
der disk-kommandoer, som indlaa- 
ser en enkelt blok fra disketten, og 
andre som sender dem ud igen. 
Problemet er bare, at det ved den 
konventtonelle metode tager 15 mi- 



nutter at lave en backup. Det bliver 
jo til en ikke ringe tidsinvestering, 
hvis man vil kopiere en fire, fern di- 
sk etter. 

Det var derfor ikke til at undgi, at 
de forste, som begyndte at foroge 
disket testationens overforingsha- 
stighed netop var diverse kopipro- 
grammer. (Mange husker sikkert et 
utal af fastcopy-programmer, som 
havde sit ophav hos en tysker ved 
navn Tempeimann.) 

Senere udvikling har ogsa givet 
os muligheden for at LOAD'e en- 
kelte filer med denne hurtige over- 
foringshastighed, og vi skal se lidt 
pa. hvordan dette gores. 



Hvorfor er diskettestationen sa 
langsom? 

Nar vi ser pa, hvordan de enkelte 
data ligger pa disketten, plejer vi 
normalt at sige, at de er organiseret 
i logiske blokke pa 256 bytes. Det 
fysiske format pa disketten er imid- 
lertid anderledes. En blok pa 256 
bytes vil pa disketten ligge I en ko- 
det udgave pa ca. 320 bytes. Nar 
diskettestationen indlaaser en blok. 
skal denne information forst kodes 
ned til de egentlige 256 bytes, som 
den repraesenterer. 

Det som sker under LOAD'ning 
af et program er derfor: 
1) Diskettestationen indlasser en 

blok p& ca. 320 bytes kodet infor- 
mation. 



2) Blokken bliver dekodet til 256 by- 
tes. 

3) Blokken bliver sendt 1il compute- 
ren, een byte ad gangen. 

4) Der check'es om der er flere 
blokke, der skal indlseses, og i sa 
fald springes til punkt 1. 

Den mest tidskrasvende del er 
del 3. Hver byte bliver sendt bit for 
bit. og ikke uventet er overforrngs- 
rutinen lavet med vaagt pa sikker- 
hed. Dette koster en masse tid, og 
det er da ogsa her. vi kan vinde no- 
get. 



Selve overforingen 

Alle data bliver sendt over tre linjer. 
De kaldes ATN, CLOCK og DATA. 
ATN bruges som et starlsignal for at 
gore alle enheder pa seriebussen 
opmaerksorn pa, at computeren 
skal begynde at sende. Eftersom vi 
kan have flere enheder (diskstation. 
printer etc.) tilkoblet, sender com- 
puteren en korstrolbyle. som inde- 
holder Information om, hvilken en- 
hed. der skal svare, og om den skal 
gore sig klar til at modtage eller 
sende. 

(Nogie af jer har antagelig erfa- 
ret, at hurtigloadere og kopipro- 
grammer ikke har virket med printer 
eller flere diskettestationer tilslut- 
tet. Grunden til dette er, at man har 
brugt en hurtigoverforing, som bru- 
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ger ATN som -handshake* for hver 
byte, som sendes. Problernet er, at 
de andre enheder vil opfange dette 
signal og begynde at sends svar til- 
bage. som vil forvirre hurtigoverfo- 
ringen.) 

CLOCK bruges til at kontrollere 
overforslen. 

DATA bruges til at sende data-bi- 
t'en. 

En bit sendes over ved at bruge 
bade CLOCK og DATA. Der sendes 
et signal over CLOCK-linjen samti- 
dig med at data-bit'en sendes over 
DATA-linjen. Modtageren far signa- 
let pd CLOCK-linjen og ved da, at 
data-bit'en er afsendt over DATA- 
linjen. 



Linjerne kontrolleres gennem 
Data Port A i SDDOO 
bit 3 ATN Ud 
bit 4 CLOCK ud 
bit 5 DATA ud 
bit 6 CLOCK Ind 
bi! 7 DATA ind 



Fastload overforingen 

I tillaag til ROM. har diskettestatio- 
nen ogsa en del RAM Her kan vi 
indlaegge egne rutiner, som vi kan 
kalde i stedet for de sasdvanlige di- 
skrutiner. 

Fastload-rutinen sender de en- 
kelte data pa en hurtigere made end 
den sasdvanlige senderutine. 
CLOCK-linjen bliver holdt hoj. nar 
der ikke sker nogen overforsel 
(f.eks. under laasning af disketten). 
Nar data ska) sendes, ssetter com- 
puteren CLOCK-linjen lav. Dette 
opfattes af en egen senderutine i 
diskettestationen, som begynderat 
sende byte, to og to bit ad gangen. 
Overforslen tager ornkring 40 cyc- 
les, hvilket er betydelig hurtigere 
end saadvanilg. 



Skeermen 

Normalt »stjaeler« grafik-chip'en lidt 
tid fra processoren for at fa adgang 
til grafikdata'ene i hukommelsen. 
Dette sker for hver ottende pixel- 
linje, som bliver opdateret. hvilket 
vil sige 25 gange for hver gang en 
skasrm bliver opdaterel. Dette kan 
lave kludder i rutiner, som er afhaan- 
gig af nojagtig »timing«. En enkel 



made at gore dette pa, er at gore 
skasrmen blank, men sa ser man jo 
ikke det. der saedvanligvis foregar 
pa skasrmen. 

Den normale diskette -loader 
undgar sadan kritisk -timing- ved at 
bruge den ene Imje som kontrol- 
linje. 

I fastloaderen bruges begge lin- 
jer til at sende data. Problernet med 
skaarmen loses ved at check'e hvil- 
ken pixel-linje. som opdateres i oje- 
blikket. Computeren check'er om 
det er tid til at afsende byten, for 
grafikchip'en slar til. Hvis ikke. sa 
venter den. til den er fserdig. Pa 
denne made undgar man. at der 
sker en afbrydelse midt under over- 
forslen. 

Hvordan fungerer fastload? 

For at fa maskinen til at springe 
til vor egen rutine, ma vi aandre lid! 
i maskinen. Adressen til den saad- 
vanlige LOAD-rutine ligger i en vek- 
tor I adresserne 816-817 ($0330- 
S0331). 

Nar du loader -FASTLOAD" og 
skriver RUN. vil denne vektor blive 
sendret. sa den i stedet for at pege 
pa den sasdvanlige rutine, nu peger 
pa FASTLOAD. Denne vil sa selv 
check'e, om det er kassette eller 
diskette, saledes at du ikke behover 
at bruge nogen specielle komman- 
doer. Du bruger med andre ord di- 
skettestationen akkurat som for. 

Hvordan bruger du programmet? 

Programme! som er listet her i 
btedet, er Me en fserdig version. Du 
ma ikke RUN e dette program, for 
du har SAVE't det. Nar du har SA- 
VE't programmet. laver du en reset 
pa maskinen (eller skriver SYS 
64738). Dette vil sikre, at alt er klar 
til naeste skridt i processen! 

Nu skriver du i direkte mode: 



POKE 642.16 . SYS 64760 



Du kan sa indlaase programmet 
ved at skrive -FASTLOAD. MK« .8 
(ikke load programmet ,8,1) 

NSr du sa endelig RUN'er pro- 
grammet, vil der ga nogen tid for 
alle data er lagt ind i hukommelsen. 
Deleft er vil programmet lave en 
faerdig version pa disken. Dette pro- 
gram vil have navnet "FASTLOAD", 
og er det program du i fremtiden 
kommer til at bruge 



For at bruge FASTLOAD skriver 
du nu bare: 



LOAD -FASTLOAD- ,8 
RUN 




Derefter vil dine programmer 
igen blive loadet betydelig hurtigere 
end fra turbo-kassetten!!! 



Det skjulte program 

For at vasra kompatibel med flest 
multge programmer, er det vigtigt. 
at FASTLOAD finder sig mest mulig 
ugenert hjemme i din Commodore. 
Det er umuligt at garantere fuld 
kompatibilitet, da programmet selv- 
folgelig er nod til at befinde sig i 
RAM, og andre programmer kan jo 
tasnkes at bruge det samme om- 
rade. 

Vi har lagt programmet under 
KERNAL'en, fra $F000 til SF3FF. 
Dette er godt nok et omr&de, som 
bruges af en del programmer med 
megen grafik, men stort set holder 
folk sig vaak fra det. 

I tillasg til dette omrade, ma vi 
ogsa have lidt plads til at »BANKE« 
KERNAL'en ind og ud (den m& jo 
vzere »inde«. nar vi opholder os i 
almindelig Basic), 

Deite ornrade har vi lagt nedersf 
pa "Stack'en", fordi det er et om- 
rade, der normalt ikke bruges 
(S0100-S0200). 



Kompatibelt med TURBO 

Pi ogrammet er lavet, sa det er kom - 
patibelt med TURBO til kassettesta- 
tionen (Se RUN nr.5 August 1985). 

Det vil derfor blive en forholdsvis 
hurtig affaare, at tage en kassette- 
backup af dine diskprogrammer. 

FASTSAVE er det naeste 

Det er godt at have mulighed for, 
at indlaese programmer i et hurtigt 
tempo, men hvis man arbejder me- 
get med diskettestationen. ville det 
vasre interessant, ogsS at kunne 
SAVE programmer pa samme hur- 
tige made. 

Vi arbejder med sagen, og vil 
komme tilbage i et senere nummer 
af RUN. ■ 
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BEGYnDERSIDEn 




Af Steen Schmeltzer 

Begyndersiden er en ny artikel- 
serie. der forst og fremmest hen- 
vender sig til brugere/l<esere rued 
ingen eller kun meget begrsenset 
erfaring i programmering. 

Begyndersiden vil holde sig pa 
det lave vand og beskaaftige sig 
med de mere enkle og letforstaelige 
ting omkring programmering. Der 
vil blive bragt ordforklaringer og 
programeksempler. sa for de mere 
erfarne af vore laesere vil meget af 
det, vi her vil gennemga. virke som 
"logik for burhons«. Hvis I laenker 
tilbage til dengang I selv fik jeres 
forste hjemmedimmer, havde I sik- 
kert ogsa nogle problemer, som i 
dag loses som en selvfolge. Det er 
disse problemer, vi vil prove at 
undga for andre. 

Har I sporgsmal/problemer eller 
emner, I synes vi sKulle tage op, er 



I velkommen til at skrive til begyn- 
dersiden. 



Laes brugervejledningen 

Inden vi gkr i gang, skat vi lige have 
skilt farene fra bukkene. Det er des- 
vserre nodvendigt. Af de henvendel- 
ser, vi modtager her pa bladet, har 
der desvserre vaaret en del proble- 
mer, som folk selv kunne lose, hvis 
de havde laast den brugervejled- 
ning, der folger med computeren. 
Det kan vaere en tor og tnst omgang 
- men gor det alligevel. Under alle 
omstaandigheder er det en forud- 
seetning for at folge med t denne 
artikelserie. Sa har du endnu ikke 
laest vejledningen grundigt, er du 
desvserre nod til at Isegge RUN fra 
dig, (selv om del kan vaere svaert) 



og kaste dig med fornyet energi 
over omtalte vejledning. 

Der er et sasrligt afsnit i bruger- 
vejledningen, jeg gerne vil henlede 
din oprneerksomhed pa. Det er det 
afsnit. der beskasftiger sig med bru- 
gen af tastaturet og redigeringsta- 
sterne. Commodore maskinerne er 
meget enkle at bruge, og isasr er 
det meget nemt at rette fejl, der er 
opstaet under indtastningen af pro- 
gramme!. Prov at folge retnmgsli- 
nierne i vejledningen og prov dig sa 
selv frem. Jo hurtigere du bliver dus 
med tastaturet og maskinen, |o hur- 
tigere kan du fa den fulde udbytte al 
computeren. 

Da jeg selv er I besiddelse af en 
CBM 64'er, vil programeksempler 
og henvisninger veere til denne 
computer og den medfolgende 
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danske vejledning. Imidlertid bliver 
vi ikke mere avancerede, end at an- 
dre masklner ogsa skulte kunne 
folge med. 



PRINT 

PRINT betyder skr/V Det er ogsa 
hvad der sker, nar denne kom- 
mando udfores i el program, men 
den kan ogsa bruges i direkte 
mode. -Mode« betyder ti/stand 
Computeren kan vsere i forskellige 
»modes». Grafisk mode, program 
mode og direkte mode. 

Ved direkte mode forstaes, al 
computeren ikke er ved at udfore 
noget program, og ikke er i grafisk 
mode. Cursoren vil sta og blinke og 
vsere klar tit at modtage en ordre. 
Du kunne jo prove at indtaste: 

PRINT -BEGYNDERSIDEN- 
« < return > 

< return > betyder, at du skal 
'trykke pa fasten nwket »return«. 
Se indtastningsvejledningen andet 
steds i bladet. hvor du kan se al(e de 
forskellige symboler for, hvad du 
skat indtaste. 

Der finctes flere forskellige for- 
kortelser. du kan bruge i stedet for 
at skrive kommandoerne luldt ud. 
Se side 126-127 i den danske bru- 
gervejledning. Forkortelsen for 
PRINT er et sporgsmalstegn (?). 
Prov at indtaste: 

? "BEGYNDRESIDEN- < re- 
turn > 

Som du kan se. er resultatet det 
samme som for. Hvis du bruger for- 
kortelserne i et program, vil hele 
kommandoen sta der. nar du taster 
LIST. Kommandoen LIST betyder, at 
du becfer computeren vise dig, hvad 
du allerede har indtastet som pro- 
gram. Husk at et program er define- 
ret ved hjaatp af linienumre. Si hvis 
du ikke har indtastet et linienummer 
for du indtastede dine PRINT-kom- 
mandoer, vil computeren ikke vise 
dig noget program. 



Funktioner i forblndelse med 
PRINT 

En udskrift kan ogsa stedbestem- 
mes pa skaarmen Inden vi begyn- 
der pa det, skal vi lige kikke lidt pa 
et par nyttige funktioner i forbin- 
delse med PRINT. De hjselpefunkti- 



oner vi her skal se pa. skal bruges 
indenfor anforelseJstegnene (ga- 
seojnene). Prov at mdtaste det fol- 
gende meget nojagtigt. Tast forst 
PRINT, sa et anforelsestegn , tryk nu 
pa CRSR (cursor down) 3 gange, sa 
skriver du en tekst. f.eks. BEGYN- 
DERSIDEN, et anforelsestegn og til 
slut taster du < return >. Forfrem- 
tiden vil ovenstaende se saledes 
ud: 



PRINT »<3cn> BEGYNDERSI- 
DEN« < return >. 

Som du vil se nu. er teksten skre- 
vet 3 linier under din kommandoli- 
nie. Det skete selvfolgelig fordi du 
indenfor anforelsestegnene havde 
angivet 3 stk. cursor down. Du 
kunne i stedet have brugt cursor 
up. cursor right eller cursor left. Du 
kan selvfolgelig ikke have to tegn 
inden for samme saat anforelses- 
tegn, som ophsever hinanden, 

Pa nuvaarende tidspunkt skulle 
din skaarm se lidt rodet ud. Det er 
fordi, du kun har bedt computeren 
om at skrive pa skasrmen uden at 
slette det. der stod i forvejen. Det 
kan du gore ved hjaalp af tasten 
CLR (overste hojre hjorne) samtsdig 
med du trykker pa SHIFT tasten. 
Prov folgende: 

PRINT- < clr> BEGYNDERSI- 
DErJ.. 

Tast ikke return endnu. Hvis du 
har tastet rigtigt. skulle der sta et 
hjerte lige foran BEGYNDERSIDEN. 
Tast nu < return > . sa skuUe skaer- 
men blive slettet og teksten udskre- 
vet i overste venste hjorne. Hvis du 
bruger nogle af cursortegnene 
sammen med dette slet-side tegn. 
vil du kunne placere teksten nojag- 
tig, hvor du vil pa skasrmen. Det kan 
dog gores lidt mere snedigt, men 
det vender vi tilbage til. 

Hvis du i stedet for <clr> havde 
tastet <hom> (samme tast, men 
uden SHIFT), ville skaermen ikke 
vsere blevet slettet, men teksten 
ville stadigvask starte i overste ven- 
stre hjorne. Det vil sige, at overste 
venstre hjorne er en slags referen- 
cepunkt for begge disse funktioner. 

Vi skal nu lave et lille program, 
der udelukkende vil printe nogle 
tekster pa skasrmen. Tast forst 
NEW < return >. det er en kom- 
mando. som sletter alt, hvad der 



matte vaere i computerens hukom- 
melse. Tast derefter folgende ind og 
afslut hver linie med et < return > : 
10 PRINT.. <clrxcn> DETTE 

20 PRJNT-ER EN » 

30 PRINT»TEKST« 

Tast nu RUN < return >. Nu 
skulle skaarmen vasre visket ren og 
kun din tekst sta der: 

DETTE 

ER EN 

TEKST 

Ordet READY og den blinkende 
cursor vil selvfolgelig ogsa vaare 
der. Nemt ikke? Tast nu LIST < re- 
turn >. sa skulle dit lille program 
komme til syne pa skasrmen. An- 
bring nu cursoren bag ved det sid- 
ste anforelsestegn pa linie 10. Tast 
; < return > og gor det samme i 
linie 20. Flyt nu cursoren ned under 
programme! og tast RUN < re- 
turn >. Nu skulle teksten gerne sta 
pa samme linie. 

Altsa. hvis du saetter et ; (semi- 
kolon) efter dine printsaatninger. 
haegtes nasste printssetning sam- 
men med den. du lige har skrevet. 
Dette virker bade i direkte mode og 
i programmer. Prov selv at lave 
nogle eksempler. og husk at prove 
nogle af cursor-tegnene. 



Forskellige farver 

Du kan ogsa selv bestemme skrive- 
farve i en printsaetning Den overste 
raakke taster maarket 1-8 er pa un- 
dersiden maarket med nogle forkor- 
telser. Disse forkortelser svarer til 
en farve. BLK = sort. WHT = hvid 
osv. For at fa. det til at virke i en 
pnntsaetning, skal CTRL holdes 
nede sammen med den pagaal- 
dende farve. Desuden skal indtast- 
ningen ske indenfor anforelsesteg- 
nene pa samme made som CLR og 
cursor-tasterne. Prov selv at ekspe- 
rimentere videre og gor dig heSt for- 
trolig med disse funktioner, sbm er 
helt grundlaaggende. Hvis ikke du 
bliver 100 procent dus med dette. 
kan du godt opgive al videre pro- 
grammering. 



God fornojelse! 
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Prceramanmeldelse 



Af Christian Sparrevohn 



En gammel kinesisk vismand sagde 
engang: -Der tindes to slags men- 
nesker, dem der kan lide karate, og 
dem der ikke kan!» Men uanset hvil- 
ken gruppe. man tilhorer. tror jeg, 
man vil blive imponeret af dette spil. 

Spillet er en petfekt karatesimu- 
lation, som tager en med til Ostens 
mysterier. Man starter med at vaare 
novice (begynder). Vinder man der, 
gar man videre op til l.dan (rang) 
o.s.v. op til 10-dan. 

Spillet bliver svaerere efter hver 
dan. men nar man nar til 10, dan 
bliver det ikke svserere, og spillet 
bliver ved. til man dummer sig eller 
ikke har flere krsefter til at slyre jo- 
ysticket/tasterna Men for man nar 
sa langt, skal man jo tgennem alt det 
andet! 

Kampene foregar i meget 
smukke kinesiske omgivelser Der 
findes 4 forskellige omgivelser. In- 
den for hvert niveau kaempes der to 
kampe af hver 30 sekunder. Man 
skal vinde begge kampe for at ga 
videre. 



Hvis du far din modstander i knae 
eller slar ham ud. far du point. Du far 
almindelige point, og du ikr kam- 
ppoint. Kamppointene bliver sym- 
boliseret med kinesiske tegn. Du far 




et helt. hvis dit slag/spark er rent, 
og et halv hvis det ikke er det. Det 
samme gaalder for din modstander. 
Den, der forst fax to tegn, har vunv- 
det. 

Der sidder en gammel kineser i 
det ene hjorne, og han er dommer. 
Hvis kampen ikke bliver afbrudt for 
tid, markerer kineseren. hvem der 
har vundet. Vinderen retter sig og 
bukker. 

Der er ogsa lydeffekter, men dem 
kan man sla fra. Der horer selvfolge- 
lig ogsa musik til. 3 melodier, som 
bliver valgt alt efter, hvilken type spil 
man vselger. 

Ud over at ga frem og tilbage og 
dreje rundt. dukke sig og hoppe, 
findes der 6 spark. 2 slag, 2 satomo- 
taler og to benspasnd. Det hele bli- 
ver forklaret i instruktionen. 

Konklusion: Bade grafikken og 
lyden er i top. Det er et spil, der kan 
holde en faangslet i lang tid. fordi 
det er sa afvekslende. 

Melbourne House har gjort det 
igen! 




Terminalbord model TB 81 
med sideplade 



Terminalarbejdsplads 
TB81 med 2x90° vinkler 
+ sideborde 80 x 80 cm . 



Skrivemaskinebord 




Terminalbord model TB 35 



ERMI design ApS 

Fabrfk for stSlmobler - mobelstel efter opgave 
BygadenSO , 4736 Karrebseksminde , Tiff. 03-742930 
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PROGRAM 

SECTION 

Kastteomslag 




REVERSI 

Spiiles kaides ogs& ofte for Othello 
og er el spil, hvor du spiller mod dm 
egen computer. Spillet g£r ud p4, at 
du med dine sorte brikker prover at 
indkapsle og tage computerens 
hvide brikker. 

Compuleren kontrollerer efter 
hvert traak, at du ikke snyder, og 
efter spillet gor den resultatet op, 
og fortseller dig. hvordan det blev. 

Der er kun en svserhedsgrad, 
men det betyder ikke, at din compu- 
ter er nogen let modstander - den 
overser nemlig ingenting. 

Tak til Gert Jensen for dette spil. 



Dette er et printer program til kassette- 
omslag, som er skrevet pa en Commo- 
dore 64 til en »MPS 801« printer. 

Nar programmet er i brug, er det far- 
ste, der sparges om, et bandnummer. 
Her kan svares med et nummer mel- 
lem 1 og 99. som vil blive skrevet med 
dobbelt bogstavsbredde i ryggen af 
kassetten. 

Dernasst sperges om en tekst til ryg- 
gen. og den ma max. vaare 13 bogsta- 
ver, Fylder den mindre vil programmet 
sel v saatte nogle " * " som f yld. Sa skal 
forsiden skrlves. 

Her har man 20 linier af max. 23 
bogstaver, og nar man har vseret dem 
alle igennem er der en dunce for at 
rette linierne, ved at taste linienr. og re- 
turn. Nar man er fserdig med at rette, 
trykkes "*" og return og cmslaget 
skrives ud. Programmet vil selv skrive 
nogle stipJede linier, som man kan klip- 
pe og bukke efter. 



r i 






R 1 

I 


SIDE 


H 


2 1 


009 - 


BOWLING CSh 64 


5 l 


859 - 


SYMBOL CODE 


1 


986 - 


SLRGSKIBE 


* l 


129 - 


SFJERNEKRIG 


*e 1 


153 - 


ftytl-REBHINO 


m i 






m i 


SIDE 


J 


* I 






* i 


009 - 


BOJ-1BER 


I 


024 - 




R 1 


945 - 


UFO LANDING 


U 1 


876 - 


SB SLAG 


W 1 


858 - 


Bftjfi 1609 


1 


129 - 


CftVES 


S 1 


156 - 


CfiWVONS OF ZELH2 


R 1 






Z 1 






l_ 1 







PROGRAMLOADER 

Fra MikkeS Andersen har vi modta- 
get denne Idle rutine. Mikket skriver 
selv: 

Systemet er til en C64 med di- 
skettestation. Det hedder -Program 
loader- og skal loades ind til at 
starte med. Resten skulle vaere let 
nok at finde ud af. 




PROGRAM LOADER 

INDSENDT ftp 
MIkKEL ANDERSEN 
KRAFTUAERKSUEJ 42 
7000 FREDERICK 



Til Commodore 64 



I POKE53280,0:PDKE5328I .0: P0KE56565 ,B: PR 
IHTCHR1C1423 

10 PRINT -CCLRHGRNH 3CH3CS AUC 31S/CU S/J 

II PRINT r3CH][S/-K31SPCKS/-] 

12 PRINrr3CH3tSy-3C2SpC3«* PROGRAn loa 
DER C-64 *x»C2SPCKSx-K 

13 PRINT' r 3CH ]f S/-H 315PC3C S/-3" 

14 PRlNT't3CHJES/-]C2SPC3xxjt BY . -HIKKEL 
ANDERSEN xw[ 25PCH S/-] " 

15 PRINT T 3CH H S/JH 31 S/C][ S/K H CNJC YEL J 
40 DinSC15 3.A*tl53 

^0 FORA -ITOl 4: READS C A 3 , A*C A 3: PRINTRI GHT* 
r C 3SPC3 +STR*CA D .4 3; " . " : A*(A )i NEXTA 
60 POKE56565.B0:OPENl ,0: PR INT't 2CN3C QRN3 
lNPUTCl-14 3;tUHT) : : INPUT* 1 ,A*: CLOSE1 
70 A=UALCA*3: !FA<10RA>1 4THENRUN 
80 FFAOINTCA JTHENRUN 
30 I FA= 1 4THENEND 



209 PRINT : PR INT T CNJLOAD +CHR*(34 3; AS( A 3 
:CHR*C34 3 .8C3C03 : POKEl 98 .5: P0KP631 ,13 
289 POKE632 ,82: POKf-633 ,85 : P0KE634 . 78 i PO* 
F635.13:END 

60081 DATA B , PROGRAM NAUN" 
60002 DA [A 0, PROGRAH NAUN" 
600P3 DATA B . PROGRAM NAUN 
600 14 DATA 0. PROGRAfl NAUN' 
60EJ05 DATA 0, PROGRAfl NAUN ' 
60006 DATA 0 , PROGRAM NAUN" 
6000? DATA 0. PROGRAfl NAUN 
60008 DATA 0, PROGRAfl NAUN " 
60089 DATA 0. PROGRAM NAUN 

60010 DATA 0, PROGRAM NAUN" 

60011 DATA 8. PROGRAM NAUN ' 

60012 DATA 0. PROGRAM NAUN 

60013 DATA 0. PROGRAM NAUN 

60014 DATA 0. SLUT 



KONTROLSun FOR PROGRAfl LOADER 




I 


223 


10 


32 


11 


206 


12 


147 


13 


286 


14 


Z06 


15 


21 


40 


216 


50 


100 


60 


156 


70 


144 


80 


168 


30 


IB 


288 


32 


203 


144 


60001 


174 


60002 


174 


68003 


t74 


60084 


174 


60005 


174 


6B00& 


174 


60007 


174 


60008 


174 


60003 


174 


60010 


174 


6001 1 


174 


&0B12 


174 


60013 


174 


60014 


139 
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"CASSETTE ONSLAG 
INDSENDT OF 
LHRS riUNKHOlll JENSEN 



Til Commodore 64 



IB POKE53280.0:POKE53281 ,2:PRINT I CLRJCW 
MT3 " 

20 PRINT "t CLR3 " 

39 X=8: Y =6: GOSUB1 160: PRINT"* x x x X x x 
x x * x x x" 

40 X =8 : V =7 : 60SUB 1 160: PRINT" *t 23SPC ] X ' 

50 X=8: V =8: GOSUBI 160: PRI NT"*[ 2SPC3PRINTE 
R PROGRAM TlLt2SPC3x" 

60 X=8: Y =9: GOSUBI 160: PRI NT* *t 23SpC]x 

70 X =8 : Y = 1 8 : 60SUB 1 160: PR I NT x[ 4SPC J KASSE 

T TE OIlSLAGt 4SPC3X- 

80 X=8: V = 1 1 : GOSUBU60: PRINT " *t 23SPC3*" 
90 X=8: Y = 12: GOSUBI 160: PRINT x[ 23SPC3X" 
100 K=8: Y = 13: 60SUB1 160: PRINT' xC 7SPC3SKRE 
UET AF[6SPC3x" 

110 X=8: V = 14:GQSUBH60:PRINT"'*C23SPC)-«'' 
120 X-8: Y=15: GOSUB1 160: PRINT "*C 2SPC3LARS 
HUNKHOL fl JENSEN x" 
130 X=B: Y=16: GOSUBI 1B0: PRINT "xC 23SPC3X" 
110 X=8: Y = 17:GOSUBM60:PRINT x x x x X * 

XX xx XXX" 

150 FORX=1TO2000:NEXT 
160 Xi=CHRiU6 3 
170 Di=CHR*C11 3 
180 Si=CHRi(l5 3 

190 Li = 'fS/x] CS/X3 (S/x3 [S/x} [S/xJ TS 
fx ] [S/x3 tS/xJ C S/x J CS/x3 TS/xJ CS/X] 
rs/x] CS/x3 ES/xJ CS/x3 CS/x] CS/X3 ES/x 
1 ES/X3 ■ 

200 REMxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

210 REM INDTAST TEKST TIL RYG 

220 REPlxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

230 PRINT" f CLR3 ' 

240 X=9: Y=l 1 : GOSUB1 160: PRINT" INDTAST BAA 
ND NR.' ; : INPUIN* 

250 IFUALENi 3>390RUALtNi Kl THEN1290 

260 IFLENCNi )>1THENN»( 1 )-LEFT*tNi , 1 J* N*C 

23=RlGHTitNi,l 3 

270 IFLENCNi 3 = 1 THENNt [ 1 )=Ni : NiC23=*'" 
280 X=4: Y=20: GOSUBI 160: PRINT* OK TAST ERE 
•JIRETURNCOFF] / NYT NR. TAST CREU3NC OFF3 

290 GETAi: IFAi=' THEN298 

300 IFASCCAi)=13THENGOTD330 

310 IFAi="N"THENGOSUB1290:GOTO240 

320 GOTO290 

330 PRINT T CLR ) * 

3^0 X=9i Y=9:GOSUBU60:PRINT"TEKST TIL KA 
SETTENS RYG 

350 X = ll : Y=l 1.GOSUB1 160: PRINTTIAX . 13 KA 
RAKTFRER 

360 X=9: Y=15--G0SUB1 160: INPUTPS 
370 IFLENCPi)>13THEN1270 

390 X=1: Y=20:GOSUB1160:PRINT* OK TAST ERE 
U.1RETURMCOFF3 / NY TEKST TAST f REU3NC OFF 

V 

390 GETAt: IFA*=" "THEN390 
400 IFASCEAi3=13THENGOTO430 
410 IFAi= N' THENGOSUB1270: 6OTO340 
420 QOTO390 

430 DlnP*Cl33:ClNAiC203 
440 K=13-LENCP* 3 
450 FORA=LENCPt 3+KTOK+1STEP-1 
460 PiCA3=niDiCP*.CA-K3.13 
470 NEXT 



480 FORA =KTQ1 STEP— 1 
490 PtCfl)="«" 
500 NEXT 
510 PitK3="*' 

520 REMxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

530 REM INDTAST TEKST CLINIER 3 

540 REMxxxxxxx xxxxxxxxxxxxxxxxxxxxxxxxx 

550 PRINT T CLR 3x x x x * INOTASTN ING AF 

TEKST x x x x x" 

560 X=l:FDRA=lTO20 

570 Y=A*1:GOSUB1160 

588 IFA>9THENX^0: GOSUBI 160 

590 PRINTA "L IN IE I 

800 NEXT 

610 X ? 1 : Y-23: GOSUBI 160: PRINT TAST NR. FO 
R RETTELSE / IREU1XCOFF3 FOR UDSKRIFT" 
620 FORA = l T028 

638 X = 12:Y=A^1:GOSUB1160: INPUTAiCA 3 
6-40 NEXT 

650 X = l : Y =22: GOSUBI 160: INPUTFi 
660 IFF*="x-THEN?10 

670 IFUALCFi 3< lORUALCFi 3>20THENGOTO1 260 
680 X = 12:Y=UAICF* 3M ! GOSUBUSQ: A* C Y-l 3 = 

fi INPUTAit Y-l 3 
690 GOTO I 260 
700 GOTO650 

7 1 0 REM***xxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

720 REM UDSKRIFT PAA PRINTER 

730 REflxxxxxxi xxxxxxxxxxxxxxxxxxxxxxxxx 

740 OPEN! .4 

758 PRINTnl ,Li;Li 

760 PRINT* 1 .Xi 80f S/83 ; Xi* 12C S/B 3 " : Xi* - 1 
7[S/B3 : X* '43t S/Bl';Xi '66CS/83 
770 PRINTnl .Xi 001S/433 J Xi ' 12C S/B3" :DHX 
i"14N":Si;X4 17CS/B3 :X4 "2B' : flt( 1 3: X* '43 
rS/83 ;Xi*'66tSyB3* 

760 PRINTB1 .Xi 00f S/8.1 :Xi' 12CS/B3 ":DilX 
i 14R ;S*;Xt 1 7t S/B3" : X* 20 ;A*(23JX*"43 
TS/433 lXi"66[S/Br' 

730 PRINT* 1 .Xi 80CS/S3 :Xi-12CS/B3 *:Xi*'l 
7CS/B3-;Xi"20 :Aif3);Xi '43C S/B3 *:Xi "66CS 
^B3 

800 PRINT" 1 .Xi 00ES/B3 :X4 12CS/B3 :D4iX 
i ' 1 4 * ; Ni C 1 J; Si ; Xi * 1 7C S/B3 " ; Xi 20 : Ai C4 3) 
X* '43CS^83 : 
810 PRINT*1 ,X*"66tS/BJ' 

820 PRINT" I .Xi 00tS/Q3 : Xi " 121 S/B 3 ' : Di) X 
i 'il' :N*C2 3;Si;Xi •17CS/S3 ";Xi '20 ';AiC5 3; 
XV43CS/-B3' ; 
830 PRINT»1 ,Xi 661 S/B3 

840 PRINT-1 .Xi'00rS/e] ';Xi"12CS/B3":Xi"l 
?t S/B3 ■ ; X* 20 ; A$(6 3; Xi *43[ S/B 3 ; Xi"66t S 

/BY 

850 PRINT«1 ,X4 * 00ES/B] iXi 12CS/B3 "iDi;X 
i-l4"«":Si;Xi 17CS/83 iXi 20 :AiC7 3;X»" 43 
I S/B J :Xi 66f S/B3^ 

860 PRINT«1 . Xi 00E S/B 3 " : Xi 12E S/B 3 ' : DiJ X 

i 'HJ"" ;Si;Xi 17C S/B)-':Xi 20 :Ai[8 j:xt"43 

rS/B3' 'Xi '66CSye3*' 

970 PRINTS .Xi"00CS/B3 : Xi ' 12C S/B3" : DiJ X 
*"14":P*C1 J;Si;xt* 17C S/9 3' i Xi '20 ;AiC9 3i 
X4 "43C S^83"i 
888 PRINT«1 .Xi 66r.S/B3 

830 PRINT" t .Xi '00CS/B3 :Xi 12CS/B3-:Di)X 
i"H *iPiC2>iSi;Xi '17f S/B3 :Xi *20 :AiC103 
:Xi 43CS/63* : 
900 PRINT-1 .Xi 66ES/B3" 

910 PRINTnl .Xi 08CS/S3 .* Xi 1 2C S/B 3 *' : Di ; X 
i *I4' :P*C3J;Si;Xi 17CS/B3 :Xi"20 lAiUl 3 
:Xi 43CS/B3 ' ; 
920 PRINT«1 .Xi 66tSxB3" 

930 PRINTnl .Xi 00C S/B3 * : Xi 1 2[ S^B 3 " : Dii X 
i 14 :P*C4 3iSi;Xi 17CS/63 :Xi* 20 :AiC12 J 
:Xi*'43£S/B] : 
940 PRINT"! ,Xi 66tS/«] 

950 PRINTnl ,Xi 001 S/63 ; Xi ' I 2C S/B 3 " : Di; X 
i'14' iPiC5):Si;Xi"i7CS/83 ;Xi*20 JAiC133 
:Xi 43IS/B3 : 



968 PRINT-1 ,Xi 66rS/B3 
970 PRJNT-1 .X$ 3RCS/0] :** 12CS/8J :D*;X 
*"14 :Pit6);S4;Xi 17[ S/Bl :Xi"28 :Aif M ) 

980 FRINT-I ,X4 66CS/S3 

990 PRINTS, Xi 00IS/B] :Xt l2[S/8] !D*>X 
* x ^^P*<^l;S*;Xt l?CS/BJ':Xi 20 :flt(15j 

1800 PRINTM ,X1 66CS/BJ 

1010 PRINTM.X* 00CS/B3 : Xi " 1 2[ S/8 j : Dii 
X* 14 :P*(8 J; SV;Xil7tS/6J ; Xi 20 :AiC16 
jj Xi 43[ 5/BJ ; 
1020 PRINT»l.Xi 66rS/B] 

1030 PRINTni.Xi 00CS/B] =Xi ' l?t S/B)" ;Qi; 
1040 PRINT«l.X* 66tS^BJ 

1068 primt«i ,xt sers/B]- 

1070 PRINT-!. Xi 00tS^J ■JX*-121S/B3":D*I 
1090 PRINFnl ,X* 66CS/SJ 

1 180 PRINTM .X* 66CS/93 

1110 PRINT.I .X* 00CS/B) :Xi- 12ES/63 *:D»; 
-X* B&fS/BJ 

1120 PRINT-I ,Xi '0BrS/B] IX* 12fS/BJ iDi) 
Xi^H ;si;x* 1 7( S/S] : Xi 43{ S/B3 " ; Xi 66[ 

1130 PRINT«1 .Li;Li 
U<?0 CLDSfl 
1 158 GOTO 1260 

1 160 Ki; PI • > > 1 1 1 j i i i 1 1 n 1 1 i m i j m i > i 1 1 % 

1170 REM PRINT POSITION 

1 180 Rtr\x*xxxxxxxxxxxxxxxxxxxxxx*xxxxx 

1138 PRINT I HOni ; 

1208 IFYO0THFNPOKE214 ,Y-1 :PRINT 

1218 P0KE211 .X 

1220 RETURN 

1238 R€tfx**xxxxxxxxxxxxxx*xxxxxxxxxxxx 

1240 REI1 SLETTE LINIER 

1758 REtfxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

1260 X=2:V = 22:G0SUB1 160: PRINT T22SPCJ :B 
0 TO650 

127B X = l 1 : Y = l 5: G0SUB1 1 60: PRINT f i0SPCr 
1280 GQTO360 

1290 X=26: Y=ll:GOSUBl 160: PRINT r 10SPC3" 
1300 GOTO240 



KONTROLSUH FOR KASSETTE OHSLflG 



10 


214 


20 


1 1 7 
lie. 


qn 
JB 


c 
J 


10 


152 


50 


1 JO 


era 
Do 


1 Q«1 
1 31 


70 


<w 


80 






1 JO 


100 


80 


1 1 «3 


i qq 
I 3D 




231 


138 


200 


I i to 


*-> S 

j 3 


1 Do 




160 


1 73 


1 70 


i «5 1 
1 - ' i 


i a Ot 
I O0 


167 


198 


230 


280 


207 


7 I 0 


1 7 


220 


207 


230 


1 12 


740 


1 1 P 


238 


197 


260 


247 


•77R 


. t u 


280 


235 


298 


104 


100 
Jon 


777 


310 


111 


320 


36 




1 1 7 


340 


223 


350 


59 


360 


1 7fi 


370 


153 


380 


RA 


I'll 


i rac 
1 WD 


-000 


278 


110 


1 48 


470 


T7 


-130 


135 


440 


148 


450 




460 


88 


470 


* JD 


aoa 

" uv 


ZD 


490 


38 


500 


1 30 


si a 


D 


520 


207 


.--■■J 


T7 
•3/ 


JIB 


-JO T 

207 


558 


233 


560 






lb/ 


588 


38 


590 


q 


coo 
U(J(< 


i in 


618 


20 


620 


1 71 


Rift 


1 Q 

1 J 


640 




U-JU 


I 3D 


ODrJ 


81 


670 


13 


680 


129 




D/ 


700 


36 


710 


707 
cay 


77Q 


-:4 l 


730 


207 


710 


48 


r JO 


1 fS 
1 o 


760 


185 


770 


235 


780 


710 


790 


231 


800 


225 


810 


777 


820 


227 


830 


227 


840 


737 


858 


205 


880 


206 


870 


232 


880 


227 


830 


L? 


900 


227 


310 


19 


320 


227 


930 


21 


910 


227 


958 


23 


960 


777 


S70 


25 


980 


227 


990 


27 


1000 


227 


1010 


29 


1020 


227 


1030 


31 


1848 


227 


1050 


72 


1063 


227 


1078 


74 


1080 


227 


1090 


67 


1 100 


227 


1 1 10 


130 


L 1 20 


30 


113B 


16 


1 140 


209 


I 150 


82 


1160 


123 


1170 


113 


L 180 


123 


1198 


43 


IZ00 


179 


1210 


175 


1220 


142 


1230 


123 


1218 


67 


1258 


123 


1260 


169 


1278 


189 


1280 


31 


1238 


131 


1308 


31 












REl/ERSI 

INDSENDT ftp 
GERT JENSEN 
P0STB0KS 211 
9800 HJ8RRING 



Til Commodore 64 

5 REM REUERSI 

6 REH 

7 REH 

9 U0 = 54296: AO =54277: UF = 54276: HF -54273: LF 

=54272: HP=51275:LP=51271:SR=54278 

IB POKE 53281 ,9:P0KE 53280 ,8: G0SU8 L0100 

11 PRINTCHR* [ 147 DCHRiC 1 12) 

12 01P1 B«C8.8),fl>CBj.flYC8).ftX»C60].flYX(6 
0) 



13 FDR I 

14 OflTfl 
6.8 .3,8. 

15 DATA 
4.3 .5.3. 

16 DATA 
3.7 ,6.2. 

17 DfiTfl 
7.2 .7.7. 
19 FOR I 
19 DATA 
.0.-1 
70 FOR I 
EXT J.I 
21 B*(i. 
•7: SS=0 
25 GOSUB 

94 Kl=l: 
IL DU SP 

95 GETAi 

96 IFA4= 

97 IFfl4= 



= 1 TO 60: READ AX*t 1) ,AY»C I ): NEXT 
1 .1 .1 .9,3.9.8.1 ,3.1 .6.1 .8.3.8.6 
1 .6.1.3.3.3.6.3.6.6.3.6 
4 .1 .S.l .9.1 .8.5.5.8.4 .8. 1 .5 .1 ,4 
6.4.6.5,5.6.4.6.3.5.3.4 
4.2.5.2.7.1.7.5.5.7.4.7.2.5.2.4. 
7.3.7.6.6.7.3.7.2.6.2.3 
7.1 .8.2.8.7 .7.8.2.8.1 .7.1 2 2 1 
2.7.2.2 

= 1 TO 9: READ AXC I J . AY C I 3 : NEXT 
1.-1.1.0,1.1.0.1.-1 . 1 .-1 .0,-1,-1 

=1 TO 8:F0R J=l TO 8: BxC I .J J»0: N 
4 3=l:B?*CS.S 3 = I : B* C 1 . 5 )=2; B*C 5 , 4 ) 



8000: GOSUB 1800 

Yl =l : GOSUB t 5880: PRINTCHR4CI 58 3"U 
ILLE F0RST ?. . J 
: I FAi i THEN95 
N"THEN208 
J THEN99 
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98 GOT 095 

99 GO SUB 3399: GOTO 110: 
130 GOSUB 5B00 

110 GOSUB 2008 

111 P = ll94*X*2i-Y*80UF 8*rx.YX>8 THEN G 
OSUB 6508: GOTO 1 10 

112 POKE Pt51272.B:P0KE P .91 : SX=X: SY = V: I 
S=l:TK=l : GOSUB 3BB0 

130 If 0=8 THEN POKE P, 32: GOSUB 6580: GOT 
0 110 

148 0MSX.SY ) = 2: GOSUB 9500 

200 GOSUB 9999:OD*-0: FOR J=l TO 60 

220 SX=PXxCJ 3 1 SY =flYx( J ): U=0:TK-0: IS = 2:G 

OSUB 3000: IF U=l THEN 300 

250 NEXT: GOSUB 9000: GOTO 100 

300 P=1194tSX»2tSYj>80:POKE 54272*P . 1 

305 FOR I =1 TO 18 

310 POKE P .32 

315 POKE P.8l:P0KE P1-S4272.1 
320 NEXT 

348 TK=1 : 1S=2:G0SUB 3800 ! B* ( SX . SY 3 = 1 : GOS 
UB 9580: GOTO 100 

10B0 POKE 54272*1522. !:POKE 1522,81 
1010 POKE 512?2Tt521.8:P0KE 1521. Bl 
1020 POKE 51222*1602. 0:POKE 1602.01 
103B POKE 51222*1601.1: POKE 1601,91 
1200 RETURN 
2000 GOSUB 3999 
2005 DD>«-0 

21310 XI =t:Yt=l:GQSUB158B0: PRINT INOTflST 
KDOROINflTER. . . C X . YK 1 1SPC J " 
2012 GETK*: IKK*= "~QRK*=CHR*U3 JTHEN2B12 
2815 GOTO 2100 

Z030 GETK*: IFK* = ""ORK*=CHR*[ 13 )ORK*=CHR* 
C41 JTHEN2030 
2055 GOTO7200 
2068 GOTO 3800 

2100 : 

2101 IFK1 = 1 THENX=t :XV=25: Y-l :GOSUBI50P 
0:PRlNTKt:GOTO2030 

2102 IFK* = 2 THENX=2:*t=2S: Y=l : GOSUB150e 
0: PRINTK*: GOTO 2038 

2103 IFK* = 3THENX=3:X1=25: Y = l ! G0SUB1 500 
0 : PR INTK1: G0T02B38 

2101 lFKt- 1 THENX=1:XI=25: Y = l : GOSUB J 500 
0: PRINTK1: GOTO2B30 

2105 IFK* = 5 THENX=S:X1=25: Y=l : GOSUB1500 
0:PRINrK»:GOTO2830 

2106 IFK*= 6 THENX=6:X1=25: Y=l :GOSUB1500 
0 : PR INTK* : GOTO2038 

2lB? IFK* = 7 THENX=?:Xl=2S:Y=l:GOSUB1500 
0 : PR INTK*: GOTO2830 

2I08 IFK*- 8 THENX=8:Xl =25: Y=l : GOSUP 1588 
0: PR fNTKi: GOTQ2038 
2103 G0SU8221B:G0T02888 

2200 : 

2201 IFKl= 1 THENY = l:XU27:Yl = i:GOSUB150 
B8: PRINTKt: GOTO3008 

2202 IFK*="7 TMENV=2:Xl=27: Yl =1 : GOSUB150 
08: PRINTK*: GOTO3000 

2203 IFK1 = ' 3 THENY=3:X1 =77: Yl = 1 1 G0SUB15B 
00: PRINTK* ' GOTO30BB 

2204 lFfci = 4 THENY*4:X1=27: Yl =1 : GOSUB 158 
00: PRINTK*: GOTO3000 

2285 IFKi= 5 THENY=S: XI =27 : Y 1 -= t : GOSUB 1 58 
00: PRINTK*: GOTO3000 

?*I*G 1FK* = b IHENY = 6:X1 =27: Yl =1 : UOSUB150 
00: PRINTK* : GOTO3088 

2207 IFK* = r THENY=7tXl =27: Yl =1:GOSLJB150 
00: PRINTK*: GOTO308B 

2209 1FK*= 8' 7HENY=6: XI =27 : Yl =1 : GOSUB150 
00: PRINTK* : GOTO3000 

2203 GO£UB221B:GOTO2000 

2210 F0RCT=1T05 

2211 Xi =12: Yl =23: GOSUB 1 5880: PRINT BENYT 
TPL 1 1—8 )*' : GOSUB8500 

2212 XI =12: Yl =23: G0SU8 1 5080: PR1 NT ' t 15SPC 
1 :FORrO = lTO2B0:NE>tTTO 

2213 NfXT-CT 
2215 RETpRN 



3000 UMMF BxfSX.SYlOB THEN LU0: RETURN 

3018 T0^8 

3020 FOR 1=1 TO 8 

3038 Tl=-l:TX=SX:TY=SY 

3040 TX=TXtflXtn:TY = TY»8Y(I i: Tl =T1 + 1 : IF 
TX<1 OR TX>8 OR TV<1 OR TY>8 THEN 3200 
3058 IF B*CTX.TY)=0 THEN 3208 
3060 IF B*CTX.TY)=1S THEM 3010 
3070 T0=T0*Tl 

3080 If TK=0 OR Tl=0 THEN 3208 
3098 TX = TX-ftX(I ):TY=TY-flYClJ 
3108 IF TX=SX AND TY=SY THEN 3200 
3110 B*f TX.TY)=3-0xCTX,TYl 
3120 Il=1194tTM»2rTYxee 

3130 IF IS = 1 THEN POKE 54272+I 1 ,0: GOSUB 
7000 

3110 IF IS=2 THEN POKE S1272+I 1 , I : GOSUB 
7500 

3190 GOTO 3090 
3200 NEXT 

3218 IF T0=0 THEN U=0 
3720 RETURN 

1100 POKE U0.IS:POKE P0.17:P0KE SR.32:P0 
KE UP, 17 

4110 FOR TG=1 TO 5 
1120 H1=10:L1=18 
It 30 POKE HF. HI: POKE LF.L1 
1118 Hl-HlT5:Ll=Ltt5 
4150 IF LK218 THEN 4138 
4168 POKE HF ,8: POKE LF .8 
4170 FOR TD-t TO 150: NEXT 
4168 NEXT 

4190 POKE UO,0:POKE UF .0: RETURN 

4208 POKE U0,15:POKE PD.17:P0KE SR.24:P0 

KE UF.65:P0KE HP.13:P0KE LP, 10 

4210 FOR T6=l TO 6 

1220 POKE HF.7:P0KE LF ,53 

12.30 fOR TDM TO 300: NEXT 

1240 POKE HF .8 : POKE LF .0 

4250 FOR TDM TO 300; NEXT- 

1260 NEXT 

4270 POKE UO.0:POKE UF ,0: RETURN 

1308 POKE U0,t5:POKE P0.32:POKE SR.I32:P 

OKE Uf .33 

1310 POKE MF.2:P0KE LF.37 
4370 FOR T0=1 TO 1000:NEXT 
1338 POKE UO.B:POKE UF .0: RETURN 
5000 fOR SX = l TO 8: FOR SY=t TO 8 
5818 TK=B: I S = l : GOSUB 3808 
5820 IF U<>0 THEN RETURN 
503B NEXT SY.SX 
5B10 IF DO*=t THEN 10000 

5045 DD* = 1 : XI = l : Y l =l : GOSUB I 5008: PH I NT" DU 

F.R K8RT FPST. JEG RYKKER I GEN . . . E 4SPC] 
5050 FOR I=l TO 3000: NEXT: GOTO 200 
65BB FOR CT=l TO 5 

6510 XV =11* Yl =23: GOSLIB15000: PRINT "ULOUL ] 
G POSITION :GOSUB850B 

6528 XI=1UY1=23:GOSUB15000:PRINT'E 16SPC 

)" 

6538 FOR TQ = 1 TO 200:NEXTrO 
6548 NEXTCT 
6558 RETURN 

7BB0 POKE UQ.15:P0KE fl0.32:P0KE WF.65:PO 

KE HP. l: POKE LP ,249= POKE SR.32 

7010 HI =50: LI =50 

702B POKE HF.Hl:POKE LF ,L1 

7033 HI sHl-*lB:Ll=Ll*t0 

701B IF Ll<240 GUTO 7820 

7050 POKE U0,8:PaKE UF . 8: RETURN 

7500 POKE UO . 1 5; POKE PD, 32: POKE WF,l7:P0 

KE SR.32 

75IB HI -248;L1=24B 

7520 POKE HF. Ml: POKE LF .LI 

7540 HI =Hl-l0:Ll=Ll-10 

7550 IF HI >18 THEN 7520 

7560 POKE U0.8:POKE UF. 8: RETURN 

9808 PRINTCHR4C 147 3 

8005 XU12:Y1=4:GOSUB15000.'PRINT 1 Z 3 4 
5 6 7 8 
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8010 PRINT TflBtll J rC/A][ lSSxCJCC^S] 
8020 flt = ISsBU S/SPCHS/BKS/SPCHS/'BHS 
/SPC J( S/BH S/SPCK Syfl ]{ S/SPCK S/fi) t fi/SPC 
][ S^0]C S^SPCJ[S/B][ S/SPCKSxB] 
B030 Bi = ' t3SPC][5/Bll ISS^CHS^ar 

8B40 FOR |-| TO SPRINT TflBC 8 ) I;TPB[41 

P.VPRINT TP.B19) 84 : NEXT * 
B050 PRINT TflBCBJ " B ;F»*;PRINT TflB[83 

[ 3SPC][C/Z][ lSS/CKCX!" 
8200 RETURN 

9500 POKE UO.15:P0KE AD .17: POKE SR.132:P 
OKE UF.33 

8510 POKE MF.5:P0KE LF.?5:FOR TOM TO 50 
0: NEXT 

8530 POKE UO.BrPOKE UF ,0r RETURN 
9008 IF OD*=| THEN 18000 

9010 Xl=l:Vt=l:GOSUBl50B0:PRINr JEG ER K 

0RT FAST . OU KftN RYKKE I BEN ' 

9015 FOR 1 = 1 TO IS08:NEXT:OO» = I ."RETURN 
9580 SS =SS-r I : If SS<60 THEN RETURN 
9658 J 1 =0: 12=0 

9668 FOR 1=1 TO 8:fQR j= t T Q 8 

9678 IF B*U.J) = 1 THEN It*fi*l 

96SB IF B*(I,J3=2 THEIS I2=IZ>1 

9698 NEXT J. I 

9695 GOSUB 9999 

9708 IF 1 1 > J 2 THEN 9750 

VI 8 IF 1 2> I S THEN 3800 

9730 Xl=l:y| =1:GOSUB1S008:PRINT DET BLEU 
Up.FGJ0RT...ri9SPCl' 

9731 GOSUB438B:GOTO9300 

3/50 Xl=| : Yl-1:GOSUB15000:PRINT JEG UflND 
I Slt3 100"; I 2: GOSUB 1100: GOTO 9980 
3800 XI -I : ri =1:GOSUB1S000:PRINT' OU UANDT 
:I2; "MOD ; I I : GOSUB4200: GOTO 9900 

3360 Xl=l:rl=3:GO£UBl5000:PRINT ET NYT S 

PIL tJ/N)' 

3301 GETAl-'IFflti THEN990 1 
9902 1FP4: N THEN20800 
390-3 I Ffll = J THENRUN 
931 0 GOTO 9900 

3999 FOR I -1024 TO ll43:POK£ I,32:NEXT:R 
E T URN 

10000 XI - 1 : >' 1 = 1 r GOSUB1 5800: PRINT Ul FR B 
EGGE K0RT FAST. SPUIET ER SLUT. 
10010 fORCT=l rO300B:NEXT:GOTO9650 

10180 PRINTCHRIC 147)CHR4( M2JCHR1C53 
10103 X1--11:V1=02:GOSUB15BB0: PRINT [ 1 ?%/ 
QJ 'CHR*CI14 ) 

10181 XI =31 : ¥1 =34 : GOSUB 1 5088: PRi NT' [ REU] 
COFF] ":PRINT 

10105 PRINT "I 1SPCH REUH3SPC)[C^*HOFF] 
CREUJMSPCUOFFJ C REU J t OFF)[ 2SPC][ REU] 
EOFF1 CREUU4SPCK0FF1 t REU][ 3SPCH C/*JC 
OFF] fREUKS^K 3SPCJtOFF3 [ REU] [ OFF] " 
I0186 PRINT f 4SPC3CREU] t OFF I C 2SPC ] [ REU ] 
[ OFF] [R£U] [OFFIMSPCHREU] [ OFF JC 2SPC 
11 REU] COFF] [REU] C OFF JC 4SPC JC REU j [OFF 
ItwMtRBO] [OFF] ( REU] [OFFK1SPC][REU 

10107 PRINT risPC][REUl[3SPC][OFF][S^3 
CREU)t3SPC][OFFH 2SPC]f REU] [OFFH2SPCJE 
REV] [OFF] [KEUH3SPCJ[0FFU2£PC)[REU][3 
SPC][OFF][ S/JX [C^][REU1[ 2SPC][C/*HOFF 

J C REU J. [ OFF] " 

10108 PRINT [ <tSPC][ REUJ [ OFF H C/x ][ REU « 
C/* K OFF J[ 2SPC ][ REU] { OFF][ ISPCJt C/-H RE 
U][C/Jc][OFFJIREU]tS/«(][OFF][S^] [REU] f 
OmMSPCKREU] COFF]rC/*][REu][C/xj[OFF 
3[5SPC][REU] (OFF] CREU] [ OFF] 

10109 PRINT'[4SPC)[REU] [OFF] [Cx*][R E U] 
Jii 0fF1 CR eujfqSPC][ 0FF)[2SPCJ[C^][ S 

/.fit 2SPC.lt REU It 4SPCKDFF! CREU) COFF] [C 
/•HREUjtC^HOFF] [REUK3SPCH0FFH Ss*\ 

CREU] [OFF]' CHRtflSB] 
IB I 20 XI=0^: Y1=12:GOSUB15800:PRJNT xxx F 
OR COnnODORE 61 xxx 

10121 XI :06: YJ =13: GOSU8158B0:PR1NT 



10122 Xt=16:Yl--|5:liUSUBl50B0:PRlNT 1 9 a 

10125 Xl=12: VI = 1 7: GOSUB 1 5088: PR ] NT JnGEN 
COPYRIGHT CHR*( 1 41 ) 
I 01 30 XI =11 : Yl =21 rGOSUBlSBBB: PRINT T I 7Sy 
01 CHRltl58J 

10110 FOR CT=I TO 18B:NEXT 

1 028B POKEUO .15: POKEflP . t 5: PCKESR . 32 ; POKE 
UF .65: POKEHP . 1 : POKELP , 10 

10202 HI=5:L1=S:H2=250:L2=250 

1 0203 POKEHF .HI S POKELF .L 1 i POKEHF ,H2: POKE 

10201 HI =Hlf5:l_l =Ll r5:H2=H2-5:L2=L2-5 
10205 J FC2>5 THEN! 0203 
10207 POKEUO. 0: POKEUF .0 

10255 FORCT = J TQZ00: NEX T 

1 0256 XI -3 1: VI =22: GOSUB 1 5800: PR JNTCHRtf I 
8) RETURN" 

I0268 FORCT =l TO208: NEXT 

^18265 Xl=31;Yl=22:GOSUB15000:PRINT RETUR 

10270 GETSTt: IFST4 OCHRlt 1 3 )THEn10255 
18275 RETURN 

15000 PRINTCHR4 ( 13 ) 

15001 IFY1 O0THENPOKE211 . Yl-l : PRINT 

15002 P0KE21 I .XI 

15003 RETURN 

70000 PPINTCHR4(H71 
2000 1 END 

KONTROLSUH FOR REUERSI 
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TIPSPROGRAM SIDSTE DEL 
TIL COMMODORE 64 



18010 D I HERK 508 )! O1P1SR4C200 1:01(164(403: 
DIP1R1 C 13 ) ,RX( 13 3 ,R2C 1 3 ): DlriRK*( 13. 10) 
10015 0INRE*( 13 3 .HEK 13 3 .HflK 13 ) 
13 208 REn*» ******* x» xxxxxxxxxxxxxxxxxx 
13201 RE" INDTftSTNING flf SYSTEPlER 
13203 REN**"*"** ******************** 
1 3210 PRINT' f CLR] ' : X = 7: Y = 2: GOSUB20000 : P R 
INT'C REU]C ZSPC] INDTAS TNING flF SYSTEW2SP 
C3 ' 

13215 X = 0: Y = ZB = GOSUBZBBBB: PRJNT5T* 

13216 X=7: Y=S:GOSUB28000: PRINT ANTflL SYS 
TEfl KUPONERCZSPCJ; ' 

13218 X=30: V=5: GOSUBZBBBB: [NPUTSK* 
132Z0 X=7: Y=6:GOSU820B8B: PRINT "ANT ,ENKEL 
TRK.CnAX.255): 

13222 X=30: Y=6: GOSUB2000B: INPUTRE* 
13230 X=7:Y=7:GOSUB2B080:PRiNT flNTPL HEL 
GftROERINGERC 2SPC): 

13232 X=30: Y=7: GOSU820000: INPUTHE5* 
13210 X=7: Y20:GO£U820B00:PRJNT ANTflL HflL 
UGflRDERlNGER : 

13212 X=30: Y=8: GOSUB2000B: INPUTHfl* 
13243 Gflx=HEi«rHfl». 

1 324S IFUi I THENFORI « l TOGfl*- 1 ! G0SU81 430B: 
NEXT 

13250 IFfiE*=BTHENGOSUB14900? GOTO1330B 
13252 IFHE*=0THEN13300 

13255 FORI = 1T0HE^: FORI I = lTOINTf (REM/1 0)r 
.39 ) 

13260 X = 7: Y = 1 0: G0SUB2BBBB: PRI NT tREU) IN 
DTAST HELGARUERING NR. 1(CU] 

13270 x = 7- V = 1 1 : GOSUB200BB: PR INT t REU ) KU 
PON NR. II ecu: • 

13271 X = 22: Y = 1 2: GOSUS2B000: PRINT [ S/J ][ 1 
OS/* It S/K) 

13200 X = 0>: Y = 22: GO5UB20000: PRINT ( 25SPC) 
: GOSU01 3808 

13290 X = 07: Y =22: GOSUB28B08 : PR I NT f REU) I 
NDTPSTNING QK? J(F7)VN 

13291 GETQl : 1 FQi = THEN13Z91 

13292 IFQi < > TF7) ANDQtO N THEN13231 

13294 IPQt: N THENX=2l : Y =1 1 : GOSUB20800: P 
RJNT ( 12SPC) r TEi= :GOTO13200 

13295 IFQi- r F7) THENHE* ( I 3=HE*(I )tTE*:X 
=21 : Y=l 1 : GOSUB28000: PRINT" ( 12SPC] 

13296 IFQi="(F7) THENTE4- : 

13233 NEXTI I . P G0SUB1 49BB 

13300 REn** xxxxxxxxxxxx xxxxxxxxxxxxxxxx 

13301 REH HflLUGARDERINGER 

13303 IFHfl* :8ANDU - 1 IHEN1 4 150 

13304 1 FHfl* =3AN0U = 1 THEN1 4 1 50 

13305 IF HF»*=BTH£N13B00 

1 3306 ]FRE*=BTHENG0£U8 14880 

13307 IFRE*=BAN0U=1 THENL41SB 

13309 IFLENCHfliCl 3 3 =Q(4N0RE* >0THEN 1 33 1 0 
t3303 GDTOl 3BBB 

13310 HO = 1 : FOR I ~ I TOHflx: FORI I = 1 TOI NT ( t RE* 
✓ 10 )70.99) 

13320 X=?: Y = I 3 : G0SUB288B8: PR 1 NT [REUJ IN 
DTAST HP-LUGAftOERlNG NR . " V t CU J M 



13330 X=7:Y=14: GOSUB20880 : PR J NT (RCU) KU 

pon m. II f CU3 " 

13331 X=22: Y = 1S: GOSUB20B00: PRINT I S/J J( 1 
BS/*K S/K] 

13348 X=07: Y=22 : GOSUB20800: PRINT ( 25SPC) 

: 6051)813800 
133S0 X=7: Y =22 : GGSUB2B80B. PR INT ' I REU J IN 
DTftSTNlNG OK? J (F? )/N " 
13360 GETOl: IFQ* = THEN13360 
13370 IFQSO fF7) 4NQQ40 N THEN13360 
13380 IFOi= N THENX=2l: Y = 14: GO£UB2000B:P 
R I NT f I 2SPC 1 : TE4= :G0T0133<*B 
13390 IFOi= (F73 THENHrtitI )=Hflt(I JtTE*:X 
=21: Y = 14:GOSUB?0000:PRINT ( 12SPCJ 

13395 X=07:Y =22: GOSU82000O: PRINT £ 25SPC] 

13396 IFOi= IF73 THEN TE* = 

1 3337 NEXT 1 1 f GOSU0 1 4708: NEXT 1 : Hf* =8 1 GOSUB 

14080: lFU=irHEN14lSB 

133*38 GOTO13800 

1 34 B0 R£n**;**»*»**«* 

1348-1 REP1 SflOE DISKETTE 

13403 REr\*xxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
13405. GOSUB20608 

13410 X=06: Y=22: GOSUB28000 : PR J NT ( REU) X 
NDTflST FILE NflUN " 

13420 X=25: Y -22: GOSUB28B00 : ] NPUTNfl* 

13421 IFLENIN01 )=0THENN8i= TEST 

13430 GOSUB2860B:OPENl .8 .2. »B: t-Nfllf ' .S 
,W 

13441 PR1NT«I.RE3* 

13442 PR I NT -l. HE* 

13443 PRINT*1 .HAx 

13444 PR1NT*1 .Gflx 

13445 PRlNT«l ,SK* 

13446 PRINT-l ,N0* 
13443 IFRE* =0THEN13456 

13458 IFHE>* >0THENFORI = 1 TOHE>: PR I NT* 1 . H£i 
( I ): NEXT 

13455 IFHflx >0TMENFORI = 1 TOHfl'-* : PR I NT" 1 .Hfl* 
(I ):NEXT 

13456 IFSK*:0THENL3460 

13457 IFHE*>0THENFOR1 =1 TOHt*: PRINT"! . SE4 
(13: NEXT 

13459 IFHflx >8THENF0RI = 1 TOHft^ : PR INTb 1 . Sfli 
CI );PRINT»1 .CK*(I):NEXT 

13460 CLOSE 1 

13462 IFN0t= TEST' THENNB1= ;GOT0tB2BB 
1346S GOTO10200 

1 3470 REI1«.»*****»***x*> %*xxxj.*xxxxxx%\ 

13>17l REH LOAD DISKETTE 

134?3 RE n«**X****»*XM* *************** 

13475 GOSUB2060B 

13460 X=B6: Y-22' GOSU320080. PRINT CREU) I 
NDTflST FILE NflUN " 

13430 X = 25: Y = 2Z: GOSU9Z0000: INPUTNF** 
13510 GOSUB20600:OPEN1 .8.2. 0: -rNptr .S. 
R 

13520 INPUT Hi .RE* 
I352L INPUTol.HEs* 

13522 1NPUTM .Hfla 

13523 INPUT-l ,G(4« 

13524 INPUT" I .SK* 

mi mn%m^x 

13530 I FHE* >B THENFORI =1T0HE>: INPUT" 1 . HEt 

1 I );N£XT 



13540 IFUA*>0TH£NFORI =UOHP«: lNPUT-1 HA* 
CI 3:NEXT 

13511 IFSlC« : orHENl355a 

13592 IFHEJOBTHENFORJ =1T0HE*: INPUTM SE* 
U3;NEXT 

I 3593 I FHA* >B THENF OR] =1 TOHA* : I NPUT • 1 Sfl* 
(I ): iNPUTnl .CKtC I ):NExT 

1355B CLOSE l : If NB* : TEST TH£NNB*= " : GOTO 

10200 

13555 G0T01B2BB 

13600 RErt**M**s*jr*****«»x*»x», 

13601 REn SflUE KASSETTE 

13603 REV*****>xxxxxxxxx*xxxxxxxxxx*xxx 

I36BS G0SUBZB6eB 

13610 X=06:y=22:GOSUS2B000:PRlNT fRFUl 1 
NDTAST FILE NAUN " 

!2f?8 *r?5:r=22;GQSUB20000: INPUTNA* 

3638 G0SuB2B68B;0PENl .1 .1 .NA* 
13640 PRINT-1 ,RE* 

13691 PRINT«1 .HE* 

13692 PRINT-I .HA* 
136^3 PRINT-I .GA* 
13691 PRINT»1 .SK* 
13695 PRJNT-1 . NB* 

13650 IFRE*=BTHEN13653 

13651 IFHE*>arH€WFORI = I TOHE* : PR INT» I .HE* 

CI J - ME XT 

13652 IFH(9^>8THENFORI=lTQHfl^:PRINT-l .HA* 
f I 5: NEXT 

13653 IFSKK-0THEN13660 

13659 IFHE*>BTH£NFORI =1 TCHE* I PR INT a 1 .SF* 
f I 3«* NEXT 

13655 IFHfl*>0rHENFORl=lTOHflx:PR]NFol .SA* 
f I 3:PRINT-1 .CKt[I):NEXT 

13656 CLOSE I 

13657 IFNBt-- TFST THENN8* = :GOTOia2B0 

13660 GOTO18200 

13670 REMxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
13571 REM LOAD KASSETTE 

13673 REttxxxXxxxxxxxxxxxxxxxxxxxxxxxxxx 

13675 GOSUB20600 

13680 X=06:Y=22:GOSUB20000:PRiNT"CR£U3 I 
ND T AST FILE NAUN " 

13690 Xr25:Y=22: GOSUB20000: INPUTNA* 
13710 GOSU820609:OPEN1 .1 ,0,NA* 

13720 INPUT»L,REX 

13721 INPUTni .HEX 

13722 INPUT" 1 ,HA* 

13723 INPUTai .GA* 

13724 JNPUT«1 .GAX 

13725 2NPUr«l P SK* 
13730 IFREK=0THEN13736 

13732 irHEf.>9THENF0RI=II0HE*: INPUT-1 .HE* 
1 131 NEXT 

J3734 IFHftx)0THENFORI=lTONAx: INPUT. 1 .HA* 
13736 rFSKx=0THEN13?42 

C?)^NEXT HEIC>0THENFOR1 =lT0HE * : INPUT »* -SE* 
13740 [ FHAx >0 THENFOR 1=1 TOHAx : INPUT»1 ,SM 
tl J: INPUT»1 .CK*C I 3:NEXT 

13742 CL0SE1: IFN0*="TEST"THENN0*="" : GOTO 
10200 V U 

13744 GOTO 10200 

13800 &Er\*xxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
I3B01 REM SUBROUTINE INQTAST GARDERING 
1 3803 REHxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
13B05 V = ll : IFHA=l THENY- M 

13806 GETO-4: IFQ*= THEN1380G 

13807 I FQ* O ' J "ANDQt 0"2"ANDQt O "X "ANDQ* 
<> C F 1 3 ' ANDQiO [ F53 ' THEN1 3806 

13808 IFQ*O CFl] -THENrE*=TE$l-QS;X=23:GO 
SUB20000:PRrNTTE* 

13809 IFO* = CFIJ THENTE*=LEFT*CTE*.LENCT 
E*3-l 3:GOSUB13840:Q*=" =GOTO13808 

u?! L22!£2 F5] " T HENGOSUB22000: I FU -0ANO 

HA ■ I ANDSK =0THENGOSUB 1 3850 

13815 IFQ*= CF5] THEWRETURN 

! lll^ IFLENC IE * }> t8THENTEi=LEFT»C T£* .10 3 

13822 IFLENC TE* 3< > 1 0THEN1 3806 

13825 IFU-0ANOHA= I THENGOSUB 13858 



13830 RETURN 
13840 Y = U:lFHA=iTHENY=l4 
13842 X=23: GOSUB20000: PRINT "t IBSPCj'rRET 
URN 

13850 REM rxxxxxxxxxxxwxxxrxxxxxrxxxxxx 

1 REM SUB. KOINUERTERINQ AF HALUGARD - 

13853 REM xxxxxxxxxxxxtxtsxtxxxxxxxxxxx 

13860 FOR?: 170LENC TE% 3 

13870 IF 1 1 = I l*HENA*=LEFT*CTE* , I 3 

138B« C*=rtID*C TEi.Z.l ) 

13890 IFC* -A*THEND*=D* + *A~ 

13300 lFCtOH*THENDt-D*+ B 

13910 NEXTif: TE-$.D*:U»= " : RETURN 

13970 &£W**xxt*xx*f*xxxxTxitrxxxxx~xxxxxx 

13921 REM J NDTAST SYSTEflRC KKE 

13923 REHxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

^V-faculrU CLRr ' : X=?: Y=3: GOSUB2000P: PR 

[XL C _^ U "2SPC3INDTAST SYSTEMOPSULLI NGt 

1 393 1 X = 0: Y - 20: GOSUB20000 : PR I n T S T * 

13932 F0RIOTQ13 

13933 ERxtrex 

13934 X = 7:Y.5i-I:GaSUB20000:pRlMT"KAMP NR 
- I?: INPUTREiCI ):NEXT 

KK^RE^ * 

13938 .FaRl=lTORE^:HE=i:Hfi = l:F0RIUlTO13 
13940 IFLENCRE4CII 33=1THEN£K*C I 3=ER*£ I 3+ 
RE*Cin:NEXTII ,I:GOTO13950 
i?n??.J FLENCRE * m »*3THENER*CI 3=ER*C I h 
MI D*C HEHHE 3 . 1 . 1 ); HE=HE* 1 : NEXT I I . I : GO T01 

3958 

13944 IFPlIUSCimCHfl 3.1,1 3= A 'THENERtC I )= 
ERiCI )+LEFT*CRE*( 113,13 

13946 IFf1I0iCHft*CHfi 3.1,1 3"~B"THENERif I 3 = 

ER*CI J+R1GHT*CRE*C 113.13 

13948 HA=HA*1:NEXT7I .1 

13950 SRx=SK^: IFSRX.0THEN13390 

13952 F0RIrir0SKX:HE = l:HP,:l:F0ftl! = lTO13 

1 3954 IFLENC RE* C 1 1 3 3 = 1 THENSR* C I 3=SR* C I 3* 

RE * C U 3 : NEX T II . I : GOTO 1 0200 

13956 IFLENCRE*CII 3 3=3THENSR*C I 3=SR*C I )t 

MI0iESEiCHE3.I.13:HE=HEU:NEXTM.I:G0I01 

13958 0*-RE*CM 3: GOSUB21 1 00: GOSUB23500:R 
E*rMID*tSA4CHA3.I .1 3-.GOSUB23000 

-GOrOi0200 ! >tSR * CI HREi:Nfl=H ** I: NEXTII .1 

13990 GU1U10200 

14000 KtnxxxxxxxxxxxxxxxxxxrxxxTrxxrrxx 

14001 REM OIILLDE SYSTEMRIKKE SYSTEMER 
14003 REnxxxxxxxxxAxxxxxxxxxxxxxxxxxxxx 
14010 PR1N1 tCLRr:x^l3:Y=3:GOSUB20000:P 

PC3 T - U-l UK2SFC3UD(3flNGSRt KKE SYSTEnER[ Z ' S 

14020 X=9: Y=8:GOSUB20000;PRINT"1> INDTAS 
INING AF SYSTEM" 

14025 X=9;Y=09:6OSUB20000:PRINT-2> INDTA 
ST SYSTEMOPSTILLINGT 

14030 X=9: Y--10:GOSUB20000:PRINT -3) INDTA 
ST UDGANGSRC KKE" 

14040 X=9:Y = I1:GOSUB20000:PRINT '4> LOAD 
SYSTEM - BAAND " 

14050 X=9:YrI2:GOSUB20000;PRlNT'5> LOAD 

SYSTEM - DISKETTE" 

14060 X=9:Y-13:GOSUB20B00:PRrNr"6> SAUF 

SYSTEM ~ BAAND " 

14070 X=9:Y=I4:GOSU820000:PRINT 7> SAUF 
SYSTEM - DISKETTE" 

MENU" X;9SV=15:GOSUB20000:PR INT'0> HOUED 

14100 X=0:Y=20:GOSUB2B000:PRIMTST* 

14101 X=12:Yr22:GOSUB20800:PRINT TREU] ! 
NOTAST UALG B-7 u ^ * 
141 10 GETQ*:IFQ*= "THEN14t 18 

H 1 20 0-a =UAl ( Q* 3: IFQ)c=0THENU^0: GOTO 10200 
14130 ONOXGOT014 140.14500. 11300. 13670 13 
470.13600.13400 * 
14140 U=[: GOTO13200 



31 



11150 U=0:GOrO14000 




14300 REM" xm*«ix xxxxxxxxxxxxxxxxxxx 

11301 REfl INOTAST Nj[6LETEGN 

1 1303 RE^xxxxxxxxmxxxxxxxxxxxxxxxvxxxx 

14305 IF I >GflwTHENRETURN 

14310 IFHCa=0THEN1440B 

14315 IFI >HExTHEN14350 

14320 X=?:Y=i?:GOSUB2000a:PRjNT CREU3 IN 
DTAST N0GLETEGN " 

11330 x=7: Y- 18: GQSUB20000:PR INT " C REV J HE 

LGRRDERINGC3SPC3T 7.CU3 " 

14310 YM8:GOSU020000: INPUTQ* 

11345 N0*=N0iH3*:X^30=YM8:GOSUB20000: PR 

INT : IF K >HE*THENRETURN 

14358 IFHfix-BTHENRETURN 

14100 X^7:YM7:GOSUB20000;PRINT CREV3 JN 
DTAST N0GLETEGN " " 

14118 X - 7 : Y = 1 8 : GQSUB20000 : PR I NT " ( REU 3 HA 
LUGfiRDER I NGr 2SPC 3 ' I-HE*+l"CCU3 ' 
11170 X-28:Y=l8:GOSUB20000: INPUTQ* 
14175 N0*=N0»tQ*:X=30: Y=l8: GOSUB20000: PR 

INT" " 

11430 RETURN 

14500 REMxixxxxxxxxxxxxxxixxxxxxxxxxxxx 

14501 REM INDTftST SYSTEMOPSTILL ING 
11503 REMxxixxxxxxxxxxxxxxxxxxxxxxxxxxx 

11510 PRINT TCLR1":X=?: Y=3:GOSUB20000= PR 
INT '[REU1t?SPC] INDTAST SYSTEMOPSTILLINGT 
2SPC3 " 

11520 X=0:Y=20: GOSUB20000:PRlNTSri 

14525 Ni=N0* 

14530 F0RIUT013 

14540 ER*=REx 

11545 X=7: IFI >-10rHENX=6 

14550 Y=5+I : GO5UB20008: PRINT KftflP NR. "I; 
: INPUTRE*! I 3:NEXT 

11555 X-7;Y=22?GOSUB20000:PRINT"tREUJ Rt 

KKER BEREGNES " 

14556 IFRE*-0THENl4600 

1 4 560 FORI = L TOREx: HE = 1 : HP« - 1 : FOR II = 1 TO 1 3 
14565 RE4=P1ID*( HE* tHE 3 . 1 . 1 3:SYr=l1I0HSR* 
(03.11,1 3 

14570 IFLENCREMII 3 3= 1 THENER4C 1 3-ERK 1 3* 
RE* CI 1 ): NEXT 1 1 . I: GOTO 14600 
11575 IFLENCREiC 1 1 3 3 = 3THENN0»=MID*(Ni .HE 
,1 1 

14580 IFLENCREHII 3 3=3THENGOSUB23080: ER* 
CI J=ER*f I 3»RE*:HE=HE+l:NEXriI . I : GOT01 160 
0 

11584 N0*=niDtCN*,HE*+HA.l 3=Qi=RE*CIl 3:G 
OSUB2H00 

14585 RE*=MIDUHfi*CHA ).l ,1 3 

11550 GOSUB2360B:ERiC I D=ERU I 3*-REi: HA 

*l:NEXni . I 

11600 SR*=SK*S tFSR*=OTHENl4690 
11610 FORI =ITQSK*: HE= 1 : Hfl = l = FORI I = 1 TO 13 
11615 R£*=MO*CSE*CHE 3.1 . 1 3= SY* =M I D*C SR* 
C83.I 1.13: 

14620 IFI EN(RE*( 1 1 3 3=1 THENSR*( 1 3=SR*C I 3+ 

RE4CI I 3:NEXTI I . I : GOTO 10200 

11625 IFLENCREtC 1 1 )3=3THENN0*=MID*(N* .HE 

11630 IFLENCREtC 1 1 3 3-3THENGOSUB23000: SR* 
( I 3=SRM I 3+RE*: HE=HE+ 1 1 NEXT 1 1 , 1 i GOT01 020 
0 

11631 N04=t1]OKN*,HEx+Hft.U 
14635 RE*-I1J0tCSP.i.CHfl3.I .1 3 

11610 GOSUB23000;SR*( I 3=SR*t I )*RE»; HA=HA 
*l :NEXTI I.I 

1 4690 N0.-NVGOTO10200 

11700 REM«x*xxxxxxxxxxxxxxxxxxxx*xxxxx 

11701 REPl CHECKSUM 

11703 REflXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

11785 FORA = ITOLFNCHAiC I 3 3:A*=MID*CHAiU 3 

.A, 1 J: IFA = 1THENB* = F1* 

14710 IFA>lflNDFl*OB*THENC»=A»tBt 

14730 IF C*= IX ORC* - XI THENCKSC I 3 = "A" 

1*3740 I FC* = " 12 0RC4 = 21 " THENCK4C I D = "B" 



14750 IFL"*= X2 ■□RC»-"2X THENCK4C I 3 = 'C" 
14760 NEXr:fi* = "' :B* = " : C* - " " sRETURN 
14B00 REftxixxnxxxxxxxx xt xx xxxxxxxxxxxxxx 
14801 REM SYSTEMKUPQNER 

14603 REM*****xxxxxxxx xxx xxxxxxxxxxxxxx 

14010 IFSK'-*-0THENRETURN 

1 4B20 HO = 1 1 SK = 1 : FORI I = 1 TQHA*: FORI =1 TOSK* 
11830 X=7:Y=l3:GOSUB20000:PRINT"CREU] IN 
DTf>STSYSTEH-KUPDN NR." ITCUK3SPCJ" 
11B3I X=7: Y=l4:GOSUB?0000:PRINT '[RE l J3 GO 
RDERING " I I "C CU3 

14832 X--22: Y- 15: 6OSUB20000: PRINT TS/J3C 1 
0Sxxj[ S/K3 ' 

14B40 X=07: Y =22: GOSUB20000: PRINT [25SPCJ 

:G0SU8 13800 
11850 X=07: Y -22:GOSUB20000:PRINT '[ REU3 I 
NDTASTNING OK? JCF73/N " 
11860 GET04: IF04= ' THFN14860 
11870 IKlStO TF7]''ANOQi<>''N'THENl4860 
1 4880 IFOi = "N" THENX -2 1 : Y = 1 4 : GOSUB20000: P 
R INT "C 12SPCJ ":TE*=" :GOTOI4840 
148B5 ITQ* : "C F7 J "f\NOQQi= "H' THENQQi-"A" 
1 4890 IF0t = '"Ir7]' THENSA*( II 3=SA*U3 3+00* 
:X=2l : Y=l 7: GOSUB20000: PRINT C 12SPC] " 
1 4892 IFQQt <> ' I ANDQQ* OX ANOQGiO" 2 " TH 
ENCK*C II )=QQ* 

14895 X=07: Y =22: GOSUB20000: PRINT ' [ 25SPC3 

14896 IFQ»= CF7 3 "THENTE* = "":X=21:Y = 14:G0 
SUB20000: PR I NT T 10SPC 3 

14899 NEXT 1,11: SK -0: RETURN 

14900 REM*x»*x***»xxxxx*r*xir;i:xXMXXXXjxx 

14901 REM SYSTEMKUPONER 

14903 REMx«x ****** *xxx*x*irxxxxxi'xxxxxx 

11310 IFSKx=0ORHEK=0THeNRETURN 
11920 SK = l:FORIl = lTOHE«:FORi sHOSK* 
14930 X"7: Y = 10: GOSUB20000: PR INT [ REV3 IN 
DTflSTSYSTEM-KUPON NR . " I "i CU] ' 

11931 X=7: Y;ll:6OSUB20000;PRINT'[REU3 Gfl 
ROERING "II tCUl M 

11932 X-2Z: Y = 12: GOSUB20800; PRINT IS/MI 1 
0S^*3CS/K3" 

11940 Xr07:Y=22:GOSUB20000:PRINT"C25SPC) 
■:GDSUBl3800 

14950 X=07:r-22:GOSUB20000:PRINT"[REU] I 

NDTfiSTNING OK? JCF7 3/N " 

14960 GETQ*: IF04= ' "THEN14960 

14970 IFQ* <> C F7J f^NDQ*<> N THE Nl 4360 

14980 IFQ*= "N"THENX=2S: Y = 14: GO?UB20000:P 

RINT C 12SPC3':TE*= ': GO TO 14940 

14990 IFQ* = "rF7VTHENSE*C m=SEiCI I )+00i 

:X=2i:Y=l4:GOSUB20000: PRINT C 12SPC3*' 

14995 X=07:Y = 22:GOSUB20000:PRlNr '[ 25SPC ] 

14996 1FQ*= IF73 THENTE*= ':X=21:Y=1I:G0 
SUB20000: PRINT C 10SPC3" 

14999 NEXT 1 . 1 1 : SK=0: RETURN 

15000 fun************************** 11 *** 

15001 REM INOTPST NftUN/flQR 

158R3 REM* a(>l * lt * 3,: * ,t: "* J[sr,f:,i::,lt3r * ,c: " ,t;irT, " clt * ,:xif 
15018 PRINT rCLR3":X-10:Y-3:GOSUB20000:P 
RINTIREU3 r HOT AST NflYN/fiDRESSE " 
15015 X -0: Y -20: GOSUB20000: PR INTST* 
15020 X^0;Y=6:GOSUB20000:PRrN[ INDTAST N 
AUNOSPCD: ' 

15025 X-16:v-6:6OSUB70000: INPUlNflt 
15830 X=0:Y=9:GOSUB20000:PRINT"INDTAST A 
URESSE: " 

15035 X = 16: Y^9: GOSUB20080: INPUTflD* 
15040 X-0: Y-12:GUSUB20000:PRINT INDTAST 
POSTNR.: " 

15015 X=16:Y-12:GnStJB20000: ENPUTPNt 
15950 X=0:Y-15: GOSUB20000: PRINT" INDTA5T 
BYNOUN : 

15055 X-1S:V : 15:GOSUB20008: INPUTBY* 
15060 GOTO 10200 

22000 REtfxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

22001 REM UNOFRSJS SYSTEfMNDTAST 



22003 RERxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

22010 T£*.=UFTUTE*.I.FNfT£*}-l 3: IFLENC TE 

* 3= 1 TMENGQ*= TE*: RETURN 

22020 IFLFNCTE* 1>2THENQQV; H" : RETURN 

22038 D*-TE*:G0SUB2I I00:Q*^ C FSD" : RETURN 

2300P REt1**xx**xxxxxxxxxx*xxxxxxxxxxxxx 

23001 REM KONUERTFRING SySTEflER 

23003 Rf pi** xxxxxxxxxxxxxxjxxxxxxxxxxxxx 

23100 I FS Yi -N0*THENRE T URN 

£3105 IFl.£N(Re*CM 3 3=3ANDRE*= H THENRETU 

23106 I FLEW RE* T 1 1 3 3;3ANDCRE4-' A ORRE*= 
B"ORRE * : C ' 1THEN231 10 

23108 ITLENf RE*C I J ) )~3THENRE*^SY*: RETURN 
23110 IFSY*= 1 ANDN0*r'X ANDRE* = ' 1 THENR 
E*r X : RETURN 

23120 IFSYtr t ANDN0*= X ANDRE* = X" THENR 
E»- l": RE TURN 

23158 IFSYi= I ANDN0*= X' ANDRE* »"B" THENR 
E* = C":RETURN 

23160 IFSY*= 1~PINDNB* = X ANDRE*='C'THENR 
Ei^ 0- ! RETURN 

23170 1FSY*- 1 ' ANDN0* = " 2' ANDRE* = 2" THENR 

E*= 1 : RETURN 

2310P IFSY*- I ANDN0*= 2" ANDRE* =" 1 " THENR 
E* - 2' .'RETURN 

23200 IfSY*= T ANON0*= 2 ANDRE* = "A THENR 
E* ; C" : RETURN 

23220 IFSY*^ I "ANDN0* = "2' ANDRE* = "C" THENR 
F*= A : RETURN 

23230 IFSY*r ->; ANDN0* =" 1 ANDRE* = " 1 THENR 
E*- X' s RETURN 

23240 JFSY* = X 'ANON0* =" I 'ANDRE* = X THENR 
E*= 1 :RETURN 

23260 3FSY*: X"ANDN0*=~ 1 ANDRE* = 'B' THENR 
E*-^C":RErURN 

23270 IFSY*="X ANDN0* = " 1 "ANDRE* - 'C* THENR 
E*= B RETURN 

23230 IFSY*s X ANUN0*: '2 'ANDRE*- X 'THENR 
E*= 2 ' : RETURN 

23300 IFSY*:"X ANDN0*= '2 'ANDRE*- '2" THENR 
E* : X ' i RETURN 

23310 IFSV* :"X ANDN0*="2"ANDRE*= 'A'THENR 
E* ; "8'' : RE TURN 

23320 TFSY*= X'ANDN0* = "2 ANDREW 'B"ThENR 
E* = " A RETURN 

23310 rFSY* = '2" ANDN0* = '-r'ANDRE*= T THENR 
E* =" 2 : RETURN 

23360 IFSY*= ' 2"ANDN0* = " l 'ANDRE* = '2'' THENR 
E*= l": RETURN 

23320 IFSY*: 2"ANDN0*= l *ANDR€*= A THENR 
E*= X :RETURN 

23390 IFSY* : ' 2 'ANDN0*- I ANDRE* = C THENR 
E*- A ': RETURN 

23-110 IFSY*r '2'ANDN0* = "X ANDRE* = " X" THENR 
E*= 2": RETURN 

F*-S-J£lfi*» M 2 " ftNDN0 * s X ANDRE* = "2 THENR 

C» - • Kt I UKN 

23430 IFSY*='2 'ANON0*: X ANDRE*=' B THENR 
E*= "A": RETURN 

23440 HSY*= 2 " ANDN0* = " X 'ANDRE* = A THENR 
E*-" B": RETURN 
23439 RETURN 

2350P RtWxxxxxxxxxxxxxxxxrxxxxxxxxxxxxx 

23501 REil N^GLETOL REDUCEREDE SYS 
23*503 REPIk xxxxxxxxxxxx* xxxxxxx* xxxxxxxx 
23510 I FQQ*3CK*CMA3THENSY*=N0»: RETURN 
23520 IFGQ*= 'A"ANDCK*(HA )= "B' THENSY* = X 
: N0* - 2 : RETURN 

23530 IFQQ* = A ' ANDCK* C HA 3 = X "THENSY*= 1 
:N0* = 2 : RETURN 

73540 IFQO*= B ANDCK*(HA)- 'A- THEN5Y*= 2 
:N0*:'X : RE I URN 

23550 I F QQ* - 'B ANDCK*(Hfl ) r C THE NSY*= 1 
:NP*= X :RETURN 

23560 IFQG5='C"flNDCK*(HFl3s' , A THENSY* = "2 
:N0*= l- rRETURN 



73570 IFOQ*- C' , ANDCK*fHA j= B THENSf*- X 
:N0*-'l :RETURN 
23580 RETURN 

23600 REWxxxttxxxxxxx-xxxxxxxxxxxxxxxxx 

23601 RFM KONUERTERING 

23603 8Etfxxxxxxixxxxxxxxxxxxxxxx<xxx\xxxx 
23610 !FOQ*=rK*rHADTHENRETURN 
23670 IFOQ*^ 'B' ANDCK* t HA 3= A ' ANDRE* = " X"T 
HENRF*-. 2 : RETURN 

21630 IFQQ*-- C ANDCK4CHA3= A ANDRE*= ' 1 T 
HENRE*= 2" : RETURN 

21W0 TFQQ1- A ANDCK* C HA 3 ; 'B' ANflfcEi ; "2"T 
HENRE*--X':RETURN 

23650 IFQQ* - 'C ' ANOCK*CHA ) = "B"ANDRE*= ' 1 T 
MENRE*= X' : RETURN 

23660 IFQQ* = "A"ANDCK*fHA 3- C ANDRE* = 2 T 
HENRE**= 1 : RETURN 

23670 IFQQ* = B ANDCK* f HA 3= C ANDRE* = X T 
HENRE* - ' 1 : RE 1 URN 
23680 RE TURN 
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PRINTERRUTINE MPS 801 



10000 ST* = t 33C/U] 

10010 DIMRK*! 13.10 3 .ERt C50B ) .SR*[208 3 
18000 REII***"* **************** ******** 

19001 REH LORD 010 FILER - UNDERtfFNU 
18003 REP1****** **************** xxxxxxxx 
18010 PRINT '7 CLRJ' :x= 1 1: Y=2: GOSUB2B000:P 
R J NT CREU1 LOAD DHJ . FILER " 
19020 X = 06: V=6: GOSUB208B0: PRINT ' 1> LOflD 
ENKELTRC KKER DISKETTE' 

19030 X=0fi: r=9: GOSUB2B080; PRINT 2> LOAD 
ENKELTRC KKER KftSSETTE" 

18040 X=06: Y = 18:GOSUB2BB0B:PR1NT'3> LOP0 

SYSTEflRCKKER DISKETTE 
1B050 X-06: Y = 12:GOSUB20000:-PRINT"4> LOPD 

SYSTEPRC KKER KASSET T E 
I81B0 X=06: Y=14:GOSUB20308;PRINT"5> INDT 
AST NAUN 0G ADRESSE' 

19185 X=6: Y=16: GOSUB20BBB: PRINT' 6> U0SKR 
IV PAA DfUAKUPONER 

18110 X=B: Y=2B: GOSUB288B0: PR INTSTi 

1B12B X=10:Y=2Z:GOSUB2B800;PRINT CREY] 1 

NCJ1AST UALG 1-6 

18130 GETQ1: IFQ$= ' THEN1B130 

19140 Qx-UftLCO* tFQ* =BTHEN!8t30 

1 8 1 50 ONQaGOTOl 82B0 . 1 8300 . 1 84B0 . 1 85B0 . 1 8 

500,23580 

18200 REH*""******* 

18201 REJ1 LOAD ENKELTRC KKER - DISKETTE 

18703 RfnilllllHrilTlIDUinrinuM: 

18285 GOSUB20688 

18210 X = 06:Y = 22:GOSUB2B8BB;PRINT'tREU3 1 
NDT6ST FILE NPUN '* 

18220 X=25: Y=22: GOSUB28008: INPUTNfl* 
18230 GOSU82060B; OPEN1 .8,2. 0: TNft*T".S, 
R 

1824B INPUT-1 .ERx 

18250 FOR I = 1 TOERx: INPUTbI .ER*tl ):NEXT 



18260 CLOSE I : GOTO! 8000 

18300 REri*«*****«x xxxxjtfxxxxxxxxxxxxx 
183B1 REn L09D ENKELTRC KKER - (CASSETTE" 
1 8383 RE 1*1** xxxxxxx xxxxxxxxxxxxxxxxxxxxx 
18305 GOSUB20608 

18310 X = B6: Y=22: GOSUB200B0: PRINT [ REU ] I 
NDTftST FILE NflUN ' 

18320 X=25: Y=22:GOSUB2B0B8: INPUTNfli 
18330 GOSUB2860B : OPEhM . 1 .0 .NAi 
18340 INPUT»1 .ERx 

18350 F0RI = 1T0ER^: INPUTo 1 ,ER*C I ):NEXT 
18360 CLOSE 1 : G0T01 9000 

1 8480 i" > ' • ' 1 » « * ' > 1 > > ■ > - - : -' i > « i > < i < i i - 

18401 REM LOAD SYSTEflRC KKER - DISKETTE 
184B3 REr\x*xxxxtxxxxxxxxxxxxxxxxxxxxxxx 
18405 G09UB2B688 

18410 X=B6: Y=22:GOSU82B8B8: PRINT [REUJ 1 
NDT85T FILE N6L»N 

18420 X^25: Y=22: GOSUB200e8: 3NPUTNAS 
184.30 GO£uB2068B;aPENl .8.2. B; tNMf.S, 

R" 

IS14.0 INPUT^l.SRx 

1B450 F0R1 = 1T0SR>!: |NPUT»t .SR1CI ):NEXT 
18468 CL0SEl:GOT0188BB 

18500 Rtrixxxxxxixxxxxx xxx xxxxxxxxxxxxxxx 

18501 RED LOflO SYSTETVRt KKER - KGSSETTE 

1 8583 RE 11* xxxxxxxxxxxxxxxxx xxxxxxxxxxxx 

10505 GOSUB2B6B0 

18510 X = 86: Y=22: GQSUS28000: PRINT f REU J I 
NOTAST FILE NAUN ' 

18520 X=25: Y=22: GOSUB2B000: 1NPUTNA* 
18530 GOSUB2B608:OPEM1 .1 .B.Nfli 
18540 INPUTbI .SRx 

19550 FORItITQSRm: JNPUTal .SR1CI 3: NEXT 
18560 CLOSEl : GOTO18B0B 

18600 RE ftxxxtxxrxxrxittxx niJiiiiuinii 

18601 REP! iNOrnST N6UN 

18603 REn******x**x***«"xax««XK«« 
18610 PRINT CCLR3' : X=7: Y =3: GOSUB20888 : PR 
INT f REU } INDTflST NAUN 0G ADRESSE ' 



34 



19620 X=0: Y=6:GOSUB20000: PRINT INDTAST N 

flUNC 7SPC] : 

19625 X=19: Y=6:GOSUB2080B: I NPUTNR4 
18630 X=0: Y=9:GO£UB28080:PRINT INOTflST A 
DRESSEt 1SPC] : 

18635 X = 18: Y =9: GOSUB70B00: INPUTAD* 
L8618 X=0:Y=12:GO£UB20000:PR1NT INOTAST 
POSTNUHHER: 

18645 X-18: Y = 1 2: GOSUB20000 : INPUTPN4 
10650 X=0:Y=15:GOSUB200BB:PR1NT I NOTAST 
BYNflUNt 1SPCJ: 

19655 X:|8: Y=15: GOSUB2B800; INFUTBYi 
18660 X =8: Y -22: GOSUB200B0 : PR I N TST* 
19678 GOTO180B0 

20BB0 REfl yuiiiinxxiijinxxxxiisixxin 
20001 REfl PRINTPQSI T ION 

200B3 REfl xxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
28010 RX=PEEK(2ll ):RY=PEEM2H) 
20815 PRINT fHOni';: IFY < >0THENpQKE2 1 1 . Y- 
t : PRINT 

20020 P0KE211 .X: RETURN 

20GB0 REPlxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
2B6B1 REpt BLANK LIN1E 

28603 RZWxxxxxxxxxxx xxxxxxxxxxxxxxxx xxx 
2061,0 X=0: Y=22:GOSUB20000: PRINT [ 1BSPC] 
20670 RETURN 

29500 PRINT [ CLR J "i I PER X =0 THENZ9500 
23510 FORA = 1 TOER*: PR =&Rt 1 : IFAR=1 1 THENAR = 

i 

29520 FORB = ir0t3:flA*=m0tCERSf Al.B.l ): IF 

T1A* = 1 THENT1A = l 

29525 1FHA*= K THENMA=2 

Z353-0 lFnft*= 2 THENHAO 

29510 JFrtA* = I THENf1A = l 

29550 lFflP.4: X THENf1A = 2 

29S60 IFMA*= 2 THENHA=3 

Z9570 RK*(B.AR)=nA:NEXTB: IFAR=180Rfl=ER;O 
HENGOSUB295B0: IFERx = ATHENENO 
29575 NEXTfl 

23580 0PEN1 .1 .0: GOSU830B00: CLOSED i G0SUB2 
5800: RETURN 
29600 IFSRXt0THEN18000 
29610 FDRC=lTOSRx 
29620 F0RA=1T013 
29630 IW=flJO*CSR*CC J. A. 11 
29610 1FI1A* = I "THENRKxtfl.I D = l 
2965B I FflA* - X THENRKxf ft ,2 3 = 1 
79660 IFf1A* = 2 THENRKXCP.3 J = I 
29670 IFflflt- A THENRK^CFt . 13 = 1 
79688 IFT1A* = 8 THENRKxCfl.i 3 = 1 
29638 IFftA* = X THENRMffl ,2 3 = 1 
29708 IFT1A* = H THENRKMfl.l 3 = i 
:RKxtA.31=l 
2 9710 NEXTfl.-flR-B: GOSUB235B0; NEXTC: GOTO 1 8 

000 

Z9SBB FQRD=T T013: FORE =0TQ1 0: RKXtD .E ) =0: N 
EXT:NEXT:RETURN 

30080 REfl j;::;:::;::;:^:;::!:::::::::; 
HER STARTER PRINTEROPIUER ============= 

30010 G05UB 38090 

30020 IF AR = 0 THEN GOSUB 30170: GOSUB 30 
350 

30030 IF AR>0 THEN GOSUB 30730 
30010 GOSUB 30830 
30050 RETURN 

30060 Ren r 

38070 REfl I AFKORT FOR LANGE TEKSTER 
REfl 



RKx£A.2]=l 
RK*(A,3)=1 
RKx(A,33 = l 
RKx(A.2 3=1 



30090 IF LENtNAi ) >30 THEN NA* =LEFT* CNAi 
30) 

3B180 IF LENC AO* ) >30 THEN P.D4 =LEF T* C ADi 
30 ) 

3BMO IF LENCPNim THEN PN* ; LEF T * CPN* 
4 3 

30120 IF LEN tBY4 ] >2B THEN BYi=LEF T*CBYi 
20) 

30130 RETURN 

3011,8 REP1 1- 



3fcU50 REU ! FIND ANTAL R[ KKER ( T R ) I 

30160 pen . 1 

301^0 TR - 1 

30180 FOR TA=1 TO 13 
381510 10^-0 
38200 FOR 1 C = I TO 3 

30210 IF RKXTTA.TOOB THEN TB : TBt 1 

38220 NEXT TC 

30230 IF TBO0 THEN 30298 

38218 PRINT TC/DU3C/I3 FEJL I SYSTEHRC 
KKE E3C/HtC^F3 

30250 PRINT rRCU]CC/-R3[OFFlf 26SFC1CC^<J 

30260 PRINT f REU U C/K31 OFF 1 1 NTE T KRYPS 

I KflflP NR , ; TA; T ABC 27 3; TC/K) 

30270 PRINT [C/C3CREU3C26C/I JCOFFKC^Uj 

3P28B STOP 

30290 TR=TR*TB 

30308 NEXT TA 

30310 RETURN 

30320 REP1 * » 

30338 REP! ! FIND POS . FOR SYSTEflKRYDS I 

30310 REU t i 

30350 tF TR = 2 THEN TT-l ; RETURN 
38360 IF TR=3 THEN TT =2: RETURN 
30370 IF TRs1 THEN TT=3:RF_TURN 
3838B IF TR=6 THEN TT=4: RETURN 
30330 IF TR=8 THEN TT=5:RF_TURN 
30100 IF TR=9 THEN TT=6: RETURN 
33130 IF TR=l2 THEN TT=7:RETURN 
30120 IF TR = 16 THEN TT =8: RETURN 
30130 IF TR-I9 THEN TT=9: RETURN 
30118 IF TR = 21 THEN T T =10: RETURN 
30150 IF TR=27 THEN TT = l ] : RETURN 
30160 IF TR=37 THEN TT =12: RETURN 
30170 IF TR = 36 THEN TT = 1 3: RETURN 
301B0 IF TR=18 THEN TT = H: RETURN 
30190 IF TR=54 THEN TTM5: RETURN 
30500 IF TR=61 THEN T T = l 6: RETURN 
30510 IF !R=72 THEN T T = 17: RETURN 
30520 IF TR=8I THEN T I =18: RETURN 
30538 IF TR=96 THEN TT =19: RETURN 
3B51B IF TR=l68 THEN TT=20: RETURN 
30558 IF TR=l28 THEN TT=2l : RETURN 
30560 IF TR=111 THEN TT=22: RETURN 
30570 IF TR=l62 THEN TT=23 : RETURN 
30580 IF TR=192 THEN TT =21 : RETURN 
30590 IF TR = 2I6 THEN TT = 25 ; RETURN 
30600 IF TR=213 THEN TT=Z6:RETURN 
30618 IF 1R=256 THCN T T =27 : RETURN 
3B62B IF rR=2*8 THEN T F -29 ! RE TURN 
30G30 IF IR-S12 THFN T [ =23 : RF TtiRN 
38618 IF TRM071 THEN IT=30;RF.FURN 
30650 PRINT •fC/D]C3C/n FEJL I SYSTEHRf 
KKE'[3C/JJtC/f J 

30660 PRINT lREUKC/K3tOFF]t76SPC3IC/KJ 
30670 PRINT 'f REU][ C/K J( OFF ]R[ KKFANTAL 
: TR; ULOULIGT :TABC27); f f!/K ) 1 
30680 PRINT rC/C][REUHZ6C/iK0FFKCA)] 
30690 STOP 

387B0 REfl t — .* 

30710 REU t CHECK ENKELTRt KKER ! 

30720 RETT r + 

30730 IF AR<1I AND flR>0 THEN 30730 
307*10 PRINT r C/OH3C/I 1 FEJL I ENKELTRE 
KKE C3C/IKCrFJ 

30750 PRINT CREU][Cv'K][aFF][26gPC][ C/iC) 

3B7B0 PRINT "CREUK lxK][OFF JULOULIGT ANT 

P.L RTKKERr ' :AR: TflBC 27 ); T C/K 1 

30770 PRINT rC^CHREU][26Cy'I]rOFFKCy'UJ 

307B0 STOP 

30798 FOR J=l TO AR 

30900 FOR I =1 TO 13 

3MH10 IF RK*U.J3>0 AND RKx(I.J)<q THEN 
3R0B0 

38820 PRINT rC/DH3C/n FEJL ] ENKEL TRC 
KKE r3CxI)tC/Fl 

30(330 PRINT rREUKC/K](0FFJ{26SPCJCC/1C] 



30810 PRINT [ REUlf C^Kjt OFF JflANGLER TEGN 

I RCKKE; :j;TflBC27); fC/K] 

30850 PRINT rC/C3[REUHZ6CyI}IOFF]CCAJl 
30B6B MBXI I 

30070 next J 

30888 RETURN 

30R9B REM xxxxxxxxxxxxxxxxxxxxxtxxxxxxxx 

30980 REI1 HEREFTER PR IN f FR SPECIFIK ■ 

30910 REM xxxxxxxxxxxxxxxxxxtxxxxxxxxxxx 
30920 REfl xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 
30930 REfl xx>x*xx PRINTER SPEUFJK *x***» 
30310 REM x*»»x»***»;***;«*atx***xx»*xxxxx* 
309S0 REM 

30960 REfl xxx* * 

30970 R£M x » i i i 
10900 REfl x*** x * x 
30990 REM x x x x x 
31000 REP» M" xxxx x 
3 1010 RCH 

31820 IF TF -8 THEN Din Tldxf 280 .25 ): TF -1 

31030 IF f»K-B THEN TH-30 

31040 IF r1R>8 THEN TH=29xflRti 

31050 IF TH>280 THEN TH = 2B0 " 

31060 FOR I = 1 TO TH :FORJ=l TO 25:IUxtI. 

J )=0:NEXT;NEXT 

31070 x|"»-0 

3108P PRINTM .CHRiC8 ) 
31030 PR]Nr»1 
31 100 PRINTB4 

31110 IF ftR-0 THEN UOSUB 31270:GQSUB 313 
60: GOTO 31 130 

31 1 20 GUSLIS 3I1?R;GaSUW 31568 
31130 PR[N1«1.CHR*(8 J 
3U10 PRINT«4.CHRttl5) 
31 150 PRINT«1 .CHR*( 15) 
31160 PRINT*1.TflBC32);Nfli 
31 170 PR J NT "I 
31180 PRINTS, TAB132 KflDi 
3 1 I 90 PRINTM 

3 12H0 PRJNF ol. TflBI 32 1 : PNt; SPCt 6 ); QY4 
3121 0 N-fl:GOSUB 31610 
31220 PRlNlttl .CNRttS J 
31230 PRINTnl .CHR4C8 ) 

31240 IF |1R = 0 THEN GOSUB 31360: GUTO 312 
60 

31250 G05UQ 31560 

3i?b0 RmiRN 

31270 TOR TH-I TCJ l3- 

31280 FOR tJ 1 TO 3 

31290 IF RK>i ( TH.lJ .1=0 THEN 31330 

31300 DY"1NT( IHX9.9-6 ) 

31310 OX-fTJ-l )*3. 11819*1 

31328 GOSUB 31630 

31330 NEXT TJ 

31310 NEXT 1H 

31350 RETURN 

31360 FOR lH = t TQ 13 ! FR INT «1 ,CHRM 9 )i C 

MR1C27);C.HR*(L6); CHRSC0 ); CHR1C61 ){ 

31370 FOR TJ = 1 TO Xft ■ PRINT *1 ,CHR*f I28t 

TUx( T I . TH 1 1; :NEXTT.J 

313B8 PRINTS. CHR*C8 J:N£XT TH 

31390 PRINT»1 ,CHR*( 1 5 ) 

31100 PRINTM. TURKS); 

31110 riE-0:UQ-Ttx9. 148919)53: IFDQ>2567HE 
N ne=B:OQ=UQ~Z5G 

31120 PFlNTM.CHRtt27)iCHR*(16);CHRitflE 1 

;chr»(UQ): 

31430 print «1 .chru208 ) ; chrk 1 76 ); chr* t 1 
76);chr*c200);chr*(b) 

31418 PR1NT"4 ,CHR*(8) 
31150 PRINTU4 .fHRiUS) 
31460 RE 1 URN 
31170 FUR THM TO I3 
31490 FOR T J 1 TO flR 
31190 PY?INU iH*9.3-6) 

31 500 DX = l tfRKxf fH.TJ )*3»TJ-1 )x9.HS19 
31510 GO^UB 31630 



31520 NEXT T.I 
31S30 NEXT. TH 
31540 RETURN 
31550 GOTO 31770 

315G0 FOR TH=l TO 19 ! PR J NT»1 , CHRi C 8 ); C 

HRtr27l;I.HR>(l6 1; EHRiffl UCHR4C61 ); 

31570 FOR TJ=t 10 XH : PR I NTo1 ,CHR* [ I 28 

iTWxfTJ .fH)l;:NEJ<rTJ 

315&0 PRINTB4 .CHR4C8 ):NEXTTH 

31550 FOR Id TO 5; PR I NTnl .CHRtCS ): NEXT I 

316B8 RETURN 

31610 FOR j-l TO Hi PRJMT«1: NEXT ! RETU 
RN 

31670 PRlNTnl.CHRirS ) 
31630 X -DXM : V;Urtl : G0SUB3173B 
31610 X -0X^7: V0rt2: GOSU03l73fl 
3I6:>0 X -DX '3: V-UY'3: G0SUB3I 730 
31 660 X -DX-*1: V=UY»1! UD«;iJB31 730 
31670 X -fix i 1 ; v=0Yt1: GOSUB31730 
31680 XiflxVZ! V=DYt3: 6Q<;UU3!730 
3165*0 X -UX'3: V--Drt2: GO1UB31730 
31700 X =UX'1: V-OY* 1 GOSUB3I730 
31718 If [)X.4>X(1 THEN Xfl'PXM 

31729 RETURN 

31730 PYX-1 tY/7: TUxf X , P Yx )=TWx( X ,PYx )+2t 
rY»7-7XPYX 1; RETURN 



KONTROLSun FOR HPS 801 



10008 


201 


10010 


47 


18088 


123 


18001 


132 


18003 


123 


10010 


146 


16370 


164 


18030 


174 


18010 


213 


18058 


253 


18108 


196 


I 8385 


200 


181 10 


56 


18120 


75 


18130 


23^ 


18148 


116 


18150 


93 


18200 


I 23 


18201 


86 


18203 


173 


I 8705 


I 33 


18210 


279 


18220 


69 


I 8730 


1 15 


18710 


157 


18250 


57 


19260 


111 


18300 


123 


18381 


93 


18303 


123 


18305 


133 


18310 


225 


18320 


69 


18330 


33 


18310 


157 


18350 


57 


19360 


111 


1 8100 


123 


18101 


120 


18103 


123 


18105 


133 


18110 


223 


1 9120 


69 


18130 


115 


19110 


171 


18150 


85 


18160 


111 


I 8500 


123 


19501 


127 


18503 


123 


18505 


133 


1H310 


279 


18520 


63 


18538 


39 


18510 


1?I 


1B550 


05 


10560 


111 


I 8600 


123 


18681 


25 


18683 


123 


18B10 


2B4 


I8620 


9 


18625 


25 


18G30 


128 


1 8635 


18 


18648 


61 


18645 


65 


1 8658 


1 16 


18655 


85 


18660 


58 


I8670 


I 30 


28088 


113 


20001 


177 


20003 


113 


20010 


68 


20015 


238 


20020 


I 19 


20600 


123 


20601 


168 


20603 


123 


20610 


179 


20620 


112 


29500 


123 


23518 


123 


29520 


53 


29525 


164 


29538 


127 


29540 


121 


29550 


164 


29568 


127 


29570 


743 


29575 


195 


29580 


233 


75F)00 


215 


296I8 


21 


29620 


173 


29630 


166 


29610 


153 


79650 


199 


29660 


167 


23670 


126 


Z3690 


120 


29090 


130 


29?80 


85 


29710 


252 


79H00 


187 


30000 


98 


3B010 


163 


3RB20 


177 


30030 


176 


30010 


177 


30050 


11? 


38060 


241 


38070 


6 


300B0 


211 


30098 


45 


30 1 00 


15 


301 18 


28 


30 1 20 


73 


30130 


112 


301 40 


241 


30150 


1 15 


30160 


241 


30170 


137 


30180 


37 


30190 


120 


30200 


50 


30210 


71 


30220 


57 


30230 


186 


30240 


101 


38258 


I 


30260 


1 15 


30270 


I 05 


30280 


111 


30290 


ei 


30300 


55 


30310 


112 


30320 


211 


30330 


7S 


30348 


241 


30350 


111 


30360 


1 13 


30378 


115 



36 



3B3R8 


i :e 


304 1 0 


166 


30418 


21 1 


3B470 


21? 


30500 


27 I 


38530 


229 


3B560 


3 


30590 


12 


30520 


71 


30650 


101 


30660 


1 89 


30710 


76 


30710 


67 


3B770 


1 03 


'40900 


21 


30330 


35 


< l -v- > ..• 


235 


30890 


155 


30320 


155 


30350 


113 


30380 


117 


31310 


113 


31B10 


719 



30398 


I 2 1 


; _ ,' 




30450 


21 S 


30490 


221 


305 t 8 


221 


30510 


2 


38570 


1 0 


30500 


13 


30618 


15 


30668 


I 


38698 


1 44 


38720 


71 1 


30750 




.if) - OO 


i a a 
l 1 f 


.inn i w 


'^3fl 






30870 


236 


38*300 


1 1 6 


30938 


121 


30968 


137 


30398 


97 


31028 


IBS 


31858 


37 



381 00 


l 23 


38130 


174 


30160 


212 


30190 


219 


38528 


222 


30550 


10 


30580 


11 


38610 


IB 


38610 


51 


38670 


224 


38788 


21 1 


30730 


1 63 


38768 


2 1 8 


jv y jo 


Uj 


38828 


181 


30850 


113 


38898 


112 


3831 0 


I 55 


38318 


155 


38978 


97 


31000 


137 


3 1 830 


181 


310G0 


20 



31070 135 

31100 201 

31 I 30 72 

31 1 fi0 23 

J1L90 201 

3 1 228 72 

3I250 172 

3I2BB 57 

31310 17 

31310 6V 

31370 150 

31400 131 

31138 736 

31468 117 

31490 30 

31520 61 

3lV*P 1 66 

3l'i60 1 60 

31G10 9 

3 I 610 5 

3 I 678 6 

3I700 6 

31 730 163 



31080 72 
31110 1 17 
3M10 118 
31J70 781 
31 200 96 
31238 72 
31260 112 
31 290 231 
31320 1701 
31358 14Z 
31 380! 168 
31410 63 
31118 72 
31478 104 
31500 27 
31538 62 
31568 38 
3159B 109 
31628 72 
316S0 7 
31668 6 
31718 51 



31090 204 
31 120 14G 
31 150 118 
31 186 1 3 
3121P 26 
31240 176 
31270 184 
31308 67 
31338 61 
31 360 30 
31398 118 
31428 59 
31458 118 
3MB0 153 
31518 178 
31510 1 42 
3 I 578 182 
3 1 600 I 42 
31 630 3 
31668 9 
31630 6 
31720 112 



MPS 802 VERSION 



30920 SEPl 'tixxixiiKixiiiiyitinixniiin 
30930 REH x*x*»* PRINTER SPFCIFIK xx**x* 

30950 REH 

30960 REri *«* 

30970 REM * * * x x 

38980 REPl >mi x ■ xxx» 

30998 R£Pt * ■ x x x 

31800 Ren **** xkix ixm 

31010 REH 

31820 OPEN 5,4.5;0PEN 6.1.5 

31838 N^CHRU8)tCHR*tB);N*=N4tNt-rN*tN* 

31018 PRJNT"6 »CHR*(46 D: PR I NT "4 

31050 IF flR = 0 THEN GOSUB 31200: GOTO 3107 

a 

31060 GOSU8 31318 

31070 PRJNlB6.CNI?tCe5 J:PRINTa4 

3IBB0 PRlNra6.CHR*(70 ):PRINT*4 .SPC(34 );N 

fit 

31830 PK1NT"1 .SPCC34 KID*: PRINT-4 , SPC C33 ) 

PNi'T3^pcr'Brt 

3 1 100 PR|Nr»6.CHP*f 1 05 1:PR1NT«1 

3M10 PRlNfBl:PR[Nf»6.(;HRif M3):PR1NT-1 

3H2C IF OR=0 THEN GOSUB 3E28H:G0T0 31I4 

0 

31 138 GOSUB 31318 
31110 PRlNTo6.CMRl(33):PRINT»4 
31158 CLOSES: CL0SE6: RETURN 
31 I G*J >:^INTCR«13. 49*52) 

31 170 X=Xi-5: Xx^X/^xi =X-XX*8: M -uEF J-% f N* 
.XI H~l URGlBlt 2CTRLX14BC0RG]' *N4: PR 1NT«5 
. LFF Tt ( K* ,8 ) 

31 190 PRINTHl.spCtX* >;CHRit25i );CHR*(111 
): :PRINr»5,f1IO»rKi ,9 ,8) 

3 11 90 PRlNULSPaxx-i-l l:CHRi(25i l.-CHRid 

11 J; : RE TURN 

'il700 PRINr«6.CNRiC34) 

31218 FOR XXM TO 13 

31220 FOR R=l TO 3 

31230 IF RKX|XX,RK>0 THEN GOSUB 31160 
31710 NEXT 
31750 PRINT-4 
31 760 NEXT 



31270 PRINT»6.CHRif44 3:PRINI"4. 

312SB R=TT:GOSUB3l 160 

31290 PRINT"6,C.HRH8U:PRINTM 

31308 RETURN 

31310 PRINT»6,CHRH34. ) 

3132B FOR XX=1 TO 13 

31330 fUR I 1 TO ftR 

31310 R= RK*(XX.l )r3*C I -1): GOSUB 31168 

31350 MEM 

31360 PR J NT "1 

31 320 Nf.XT 

313B0 rRINrn6.CHR4tl25):PRiNT«4 

31390 RETURN 



KONTROLSUn FOR PPS B02 / RUT INE 



30970 


I 55 


30930 


121 


30948 


155 


30950 


1 43 


30968 


231 


30970 


161 


309B0 


2ll 


30990 


65 


31080 


231 


31010 


143 


31020 


166 


31030 


1 30 


31010 


I 30 


31050 


136 


31060 


165 


31070 


I33 


3t030 


20? 


31090 


99 


31 100 


171 


31118 


181 


31120 


131 


31 130 


165 


31118 


I 26 


31 150 


173 


31160 


29 


31170 


I 30 


31 180 


220 


31190 


249 


31288 


I2l 


31210 


124 


31720 


237 


31230 


15 


31248 


1 30 


31250 


701 


31260 


1 30 


31278 


128 


31780 


I 10 


31230 


129 


31300 


142 


31310 


121 


31370 


124 


31330 


68 


31310 


61 


31358 


1 30 


31360 


201 


31370 


130 


31308 


176 


31398 


112 



37 



FASTLOAD 




103 fl= 2849: 1=0: J =0 
110 FORK = 0TQ7: REFUJ0: I FB =- 1 THENGGSUB1 30: G 
OT0145 

120 POKEAtI .0: I =1+1 : J = J +0: NEXT : GOSUB 130 : 
GOTO110 

'130 REflOftS: IFflSOJTHCNPRINT FEIL I DflTAS 
ETNING : PEEKC635tPEEKt6l 3*256:EN0 
140 J =0: RETURN 

1 45 P0KE43 . 1 : P0KE44 . 8: P0KE45 ,11: POKE46 , 1 

2:5flUE FflSTLOp.0" .8: SYS64738 

150 OflTflll, 8. 0. 0. 158, 58. 48. 5*, 32 

9 

168 DATA49. 8. 8. 8. 168. 50. 185. 53. 4 

97 

170 DflTflS. 153. 63. 1. 136. 208. 247. 18 
5. 1001 

L80 DflTfllB4. 8. 153. 0. 240. 185. 184. 9 
. 803 

190 DOrp.153. 0. 241. 185. 104. IB. 153. 
0, 946 

200 PATA242. IBS. 1B4. 11. 153. 0. 243. 
708, 1138 ■ 
210 PATA288. 229. 76. 72. 1. 160. 53. 12 
0. 913 

228 DATA132. t. 76. 0. 248. 163. 64. 141 
. 823 

230 DATA48. 3. 160. 1 . 148. 49. 3. 185. 
589 

240 DATI493. 1. 248. 6. 32, 210, 255, 200 
. 1037 

250 OATA208. 245. 96. 78. 65. 83. 84. 45 
. 896 

260 PATA76. 79. 65. 68. 32. 32. 40. 67. 
459 

270 OATfVU . 32. 82, 95, 78, 13. 0. 76. 4 
87 

280 0P.TA223. 242. 160. 3. 169. 15. 153. 
253. 1218 

790 DATp.245. 153. 7. 2*6 . 200, 208. 247. 
169, 1475 

300 DATP.0. 153. 54, 246. 153. 55. 246. 1 
52. 1059 

310 DATA24. 105. 8. 169. 192. 216. 208. 
239. 1168 

320 DP.TA96. 0. 0, 0. B, 128, 64, 8. 296 
338 DATA4. 32, 16. 2. 1. 168, 80. IB. 30 

5 

340 DATA5. 165. 186. 2B1 . 8. 176. 7, 162 
. 918 

350 DPTAI. 166. 245. 76. 167. 240. 201, 
12, 1102 

360 00171176. 245. 168. 8. 177. 187. 201. 
36. 1182 

378 PATP.74B. 737. 173. 21. 206. 72, 140. 
21 . 1112 

3H0 DPTO208. 128. 173. 0. 221. 41. 15. 1 
70. 949 

390 DP.TA168. 0. 185. 46. 24B. 157, 0. 24 
5. 1033 

480 Drtroi85. 42. 240. 157. 64. 245. 185. 
38 , 11 56 

410 OflTA240. 157. 178. 245. 185. 34. 248 
. 157. 1386 

478 PfiTf!l92. 245. 200. 232. 132. 4. 209. 
225. 1493 

430 0flr032. 3. 240, 173. 17. 208. 41, 7, 
721 

440 DP.TP.73. 7. til. 121. 241. 56. 32. 19 
7. B68 

458 OP.Tfl24B. 32. 84. 3. 24. 32, 137. 240 
. 852 



460 DATA12B. 160. B . 162. B. 202. 288. 2 
53, 1113 

470 DP.TA136, 208. 250, 32. 193. 241, 104 
, 141. 1305 

490 0ATA21 . 208. 162. 169. 160. 245. 142 
. 135, 1302 

490 DATA240. 140. 196. 248, 72. 162, 8. 
189. 124? 

580 PATA188 . 240. 157. 15, 1. 282, 288, 
247. 1258 

510 0ATA184. 76. 16. I. 162, 55. 134. 1. 
549 

520 DATA88 . 76. 226, 252. 160. 1S2. 190. 
63. 1207 

530 DAT A3 . 105. 2SS. 243. 144. 3. 195, 2 
20. 1238 

548 DF»rf»24B. 153. 63. 3, 138, 153. 255, 
243. 1248 

^50 DATA136. 288. 235. 96. 165. 186, 32. 
12. 1070 

*i6B Uf)lft737. 163, 111. 32. IBS. 237. 169 
, 77. 1217 

578 Gflrfl32. 221, 237. 169. 45. 76. 221. 
237. 1238 

580 DATA 169 . 55. 133. 1. 32. 231. 255. 1 
69. 1045 

590 DATA30 . 133. 139. 169. 242. 133. 148 
. 169. 1155 

600 UftTflB. 133. 141 . 169. 3. 133. 142. 3 

2. 753 

61B 0PTA61. 3, 169. 97. 32. 221. 237. 16 
5. 978 

620 DflTflI41. 32. 221. 237. 165, 142. 32. 
221 . 1131 

630 DATP.237. 169. 30. 32. 221. 23?. 160. 
0 , 1 096 

640 PATA169. 53. 120, 133. 1. 177, L39. 
72. 864 

658 Up,rA169. 55. 133, 1, 104, 32, 221, 2 
37, 952 

660 DOTO280, 192, 30, 208, 235. 32, 254. 
237. 138B 

670 UP.TA165. 133, 21, 105. 33. 170. 133. 

139. 305 

680 OATA144. 2. 230. 140. 165. 141. 24. 
105, 351 

630 DATB30 . 133. 141. L44. 2. 230, 142, 

165. 997 

708 DATA148. 201. 242. 144. 178. 224. 22 

3, 144, 1496 

710 DATAI74. 32. 64. 3. 169, 69. 32. 221 
. 764 

720 PATfl237. 169. 0. 32. 221. 237. 169. 
3, 106B 

73B DATA32. 221. 237. 32. 254, 237. 169, 
53 . 1 235 

740 PPTp.120, 133. 1. 36. 172. 16. 200. I 
85, 933 

750 DP-TP.8. 246. 248. 240. 45. 0. 221. 14 
1 . 1141 

760 PATAB. 221. 9. 32, 168. 234. 193. 0. 
' 65? 

770 DATA174. 0. 221. 183. 8, 245. 234. I 
74, 1237 

780 QATA0. 221. 29. 1. 245. 234. 174, 0. 
904 

790 DATA221 . 29. 2, 245. 23«* . 174. 0. 22 
I . 1126 

800 PATA14B. 0. 221. 29. 3. 245. 36. 173 
, 907 

810 Dptfl0. 221. 41. 15. 9. 32. 141. 0. 4 

59 

820 0A1A221 . 133. 0. 193. B. 44. 0. 221. 
872 

838 DATA88. 251. 162. 10. 202. 208. 253. 
96. 1262 

848 PATA169, 0. 133. 99, 165. 147, 74. 1 
02. 803 



38 



850 DATA98. 32, 168. 24 1. 32. 11?. 241 
t.M, 1B62 

860 DfUfllBB. 32. 11?. 241. 32. 11?. 241. 
165, 1015 

H?B P*rm80. 56. 233. 2. 133. 100. 240, 
43. 307 

800 DOrf»201. 253. 208. 16. 56. 96. 32, I 
60, 1030 

9-30 n^T0241. 32. 117, 241. 133. 100. 240 
. 2?. 1 131 

900 IJATA201. 255. 2«0, 240. 32. 11?. 241 
* 160. 1486 

910 Ofn*8. 36. 99. 49. 17, 145, 174, 230 
. 740 

920 UnTm?4. 208. 2. 230. 175. 139. 100 
im, 1*95 

930 DflT*235. 240. 219. 38. 99. 96. 209. 
174. 1310 

910 DnTfl240. 237. 56. 102. 93. 1 Q5 . 144. 
9. 1052 

350 DftTBl6. 133. 144. 208. 226. 120. 163 
. 8. 1024 

960 Uflrfll4I. 0. 24. 173. 8. 28. 9. 0. 38 
3 

970 fWfim. 8. 28. 16S, 2-1 , 133. 10. 16 
5. 666 

980 Uf«Tfl?5. 133. Mi 169. 20. 133, 82, 1 
69, 742 

990 DfUfll28. 32. 184. 3. 701. 1. 240. 39 
. 028 

1800 DflTR201. 11, 208. 5. 169. 176. 32. 
184. 986 

1010 0nift3. 173. 0, 28. 73. 9. 141. 0. 4 
26 

1020 PflTf128. 198. 82. 208. 226. 162, 8, 
142. 1346 

1830 DflTfll. 5. 232. 134, 82. 32, 125, 3, 
614 

1040 Dfllfll65. 2, 162, 2, ?6 , 10, 230, 17 
4 . 821 

1050 DflTm. 5. 134. 11. 202. 163, 254, 1 
72. 948 

1860 QfHAB. 5, 132, 10. 240. I, 170. 142 
. 780 

1070 DflTAl. 5. 232. 131. 82. 32. 125. 3. 
614 

10B0 DflTfU73. 0. 5. 208. 174. 1 
2, 011 

1090 DATP141. B. 21, l?3. 0. 21 
. 646 

l 100 DflTA14l . 0. 24. 169. I . 13 

. 572 

1110 0ATfll49. 193. 160. 0, 143. 
00, 865 

1120 DATfM85. 0, 5, 71, 74. 74. 

656 

I 130 DflTi4169. 1. 141. 0. 2<) . 4 4 
4 03 

1140 DATA208. 2SI . 142. 0. 24. 
41 . 814 

1150 DAlfMS. 141, 0. 24. 185. 0 
411 

1160 DftTniS. 141. 0. 24. IB, 41 
. 480 

I 170 DATf*141. 0. 24. 196. 37, 2 
169, 1028 

1190 DAT 08. 141. 0. 24. 96. 133 
492 

1190 D0TA165. 2. 48. 252. 120, 
147, 963 

1208 PnTniG9. 8. 133. 144, 165, 
. ?. 1012 

1218 Dr»Tfll62. 19, 1 60 . 247. 76. 
. 281. 12?2 

1220 DATA3. 240. 245. 144. 123. 
, 208, 1310 

1238 DfUn4. 162. 16. 200, 23?. 
134. 1112 



1240 DflTfM69. 162. 1?5. 160, 245. 32 12 
0. 743. 1306 

1250 Df»Tni69. 96, 133. 195. L62, 213. 16 
0. 743. 1361 

1768 DDTn32. 120. 2-13. 165. 186. 16?. 9 

160. 1077 

1779 DfHft23?. 32. 120. 243. IDS. 185. 16 
2. 199. 1313 

1280 OATAI50. 23?. 32. 1 20 , 243. 162. 19 
. 160. 1133 

1790 0flTft238. 32. 120. 243. 133, |?4 IB 
5. 144. 1249 

1380 DfHfl?4. 74. 176. 53. 162. 19. 160. 
738. 956 

1310 DAT032. 120. 2<t3. 133. 1?5. 165, 16 
9. 208. 1245 

1320 DflTflS. 165. 195. 133. 1?4 . 165, 196 
, 133. 1169 

1330 OfHni75. 162, 210. 160. 245 32 12 
C. 243. 134? 

1340 D.RT0169. 253. 37. 144. 133, 144. 16 

2. 775. 126? 

1350 DftTni60. 255. 32. 128. 243, 208. 7, 
162. 118? 

1360 UfirflSl . 160. 2*6, ?6, 167, 240 76 
50. 1066 

1370 CJ*1A240, 162, 4. 168. Z17. 76. 16? 

240. 1296 • 
1380 DnTni62, 51. 160, 215. 76. 167. 240 
. 8. I 1 09 

1398 DATA?2, 142. 150. 211. 140. 151, 24 

3. 160. 1301 

1180 PflTWl, 185. I4l. 713. I53. 15 l 
1 36, 895 

IIIB DftTfi208. Z47, 76. 16. 1, 163. 55 1 
33. 985 

1120 DfiTAI. 104. 40. gg. 32. 226. 252. I 
20. 963 

1430 OflTAS. 72. 169. 53. 120. 133. t tfl 
4 . 660 

1443 [3PTO40. 96. 1 . 136 



KDNIROLSUH FOR FASROAD 



108, 


100 


173 


110 


70 


120 


106 




130 


129 


140 


214 


145 


50 


. 213 


150 


93 


160 


I 34 


170 


177 




180 


22 


190 


66 


200 




8, 76 


710 


96 


220 


26 


230 


195 




210 


61 


25B 


64 


760 


214 


24. 2 


770 


143 


290 


225 


290 


36 




388' 


103 


310 


235 


320 


240 


170 . 


330 


62 


348 


38 


350 


161 




360 


234 


37B 


21 1 


380 


12B 


24. 


390 


119 


100 


245 


410 


96 




420 


30 


430 


228 


440 


92 


10. 


450 


30 


460 


156 


470 


59 




48B 


71 


490 


238 


508 


233 


41 , 


510 


235 


520 


239 


530 


181 




540 


231 


550 


235 


560 


42 


. 234 


578 


238 


590 


182 


590 


74 




600 " 


69 


610 


105 


620 


0 


209. 


630 


174 


640 


141 


650 


129 




660 


21 


67R 


?23 


688 


165 


68. 


690 


174 


700 


120 


718 


13 




720 


I 35 


730 


232 


?48 


135 


133. 


758 


I 10 


760 


239 


770 


t?9 




?BB 


22S 


:'90 


1 16 


880 


32 


. 209 


910 


121 


920 


224 


830 


223 


* 


840 


155 


950 


228 


860 


1 


. 240 


878 


MB 


980 


179 


890 


252 




90B 


61 


910 


47 


920 


27 


. 183 


930 


247 


940 


18? 


950 


224 




960 


83 


970 


75 


980 


I3l 


185 . 


990 


27 


I0R8 


142 


1018 


79 




1028 


184 


I030 


173 


1040 


22 



39 



1050 


Bl 


1060 


20*? 


1070 


173 


1 260 


23 1 


1270 


81 


1 288 


•? 


1000 


20 


lflHB 


222 


1 1 09 


236 


1290 


73 


1 300 


1 '.4 


i n a 
iii 


74 


1 1 10 


68 


1 120 


203 


1 1 30 


H 7 


1 320 


45 


1 330 


62 


I 3<t0 


82 


1140 


65 


1150 


115 


1 160 


214 


1350 


226 


1360 


198 


1370 


237 




i ei 


1 180 


112 


1 190 


141 


1360 


184 


1390 


51 


1400 


I3l 


I2BB 


173 


1210 


26 


1220 


12 


1410 


94 


1426 


73 


1138 


24 


1230 


2?a 


12*10 


70 


1250 


81 


1440 


50 











LISTNING I 



I 00 LSMBBrlN 1 0: REM START LlNJEff OG INK 
PEW Nl 

1 IB PRINT 'CLTBLUJ":dPENl5.B.lS 

120 GOSU8570: r,OSUB6B8: IFPt O M'ftN0fl*O'F 

T HE N 1 2 0 
13B GOSUB150 
140 FN0 

i 5B ii n* - tt ■ ihe:n74» 

100 PRiwrn NiKiuir. fii. ? iNPursot: gosu 

Ofl30 

165 OI , fN2.8.7,SOt:Gl>SUBG90: IS--49152: TE=4 
91 V2 

170 GET "2 .LL»: (FLLt - THEN) I t=CHRt(0) 
180 GEI-2.HII*: IFHHi= 7H£NHHt=CHRi(0 ) 
190 IFSUHF.N220 

200 GET B?,Ct: IFC* = " THENCt = CHRt t 0 ) 

210 POKETE ,flSCrC*3: TE =Tf » 1 : GOI01 90 

220 CLOSE2:GOSUB640: T3=flSC(LL4 ItflSCCHHt ) 

*256: TE=TE-1 : GOSUB280 

230 RETURN 

240 GCJSUB630: G0SUB649 

750 PRINT CCNISTFIRT nORCSSE : IWPUTTS; PR I 
NT fCNJSLUTT p-DRFSSE ': INPUTTE: T3nTS 
260 I F TE < = TS THENpR I N T I UHTH CN1FEJL ICLTB 
LUHCNJ :GQIO2S0 

278 IFTS>G553?ORTS<0URrE>6'5532ORrETE<0TH 
CNPRINT I UMT Jt CNJFEIL K LTBLU )T CN] :GDT02 
50 

780 PRIM "f CLR] 

2^0 LI-I.S:LK = 2B49:GQSUB3IB 

300 RETURN 

310 PR IN 1*1 .CHRiC I 1: : PRINT* 1 .LHR4C8): 
120 UTi- A tCHRit 128 l«STRi<T33t : 1 » CHR4 
fl7fllr'fl f : J ►CHRif t7B)t'a i 
330 I K -LM5*LFNCllTt ):DU=LK: GOSUB460: DU=L 
I : GOSUB460: L I =L] rIN 

3-10 PR I NT" 1 .UTi; : PRINT" 1 , CHRt C 0 J: :PRINTU 
Tt 

350 GOSUB720: GOSUB40B: t_K =LKtLEN t OUt 3: LI = 

I I > IN*3 

310 GOSUB500 

100 PRINT" I .CHR4C0); : PR I NT" I .CHRi(B); 

110 CL0SEl:ENO 

4 50 H = IN r (DUy256 J: L *0U -Hx250: RETURN 

lf.0 GClSUB150:PRINT«t . CHRilL J; : PRI NT" l ,CH 

R»IH ); : RETURN 

420 LK -LKtSrLENtOUi >: pU~LK: GOSUB460: DU=L 
I : G1JSUB169 

490 PRIWT" I ,0U»: : PRINTU1 OUTP OU* 
490 PRI NT" I ,EHR4C0); :L] =LI MN: RE TURN 
*>R0 PRINT CI.TBLU1 : T l =0: QUI =CHR* 1 1 31 3; FO 
R I 7 - T5 TOTE 

r 'IB PUt = STRt(PECM 12 ) J'i DUt =UU*tRIGHTMPU 
t.l FN(PUt)-l ):Sn-SflrPEEK( 12 ) 
•>7fl Tl =TI «l: irTl=8IHEN0Ut-DU*t . 'STRiCS 
W ):'>fV0: Ga^UB'»60: GOTO510 

"540 NE.X1 l2:DU*=0O*tSTRt(-l )t . :TI=TIt1: 

aiH-nii»TSTR*rsfliT 

'^45 UUi -I.FFTi CDUt .LFN(OUt )- I ): GOSUB560: R 
f ! URN 



550 RETURN 

560 GQSUB470: Tl :0:OU4=CHRt( I3l ): RETURN 
528 PRINT [ 2CNU9O0LAG DATR-FI L FRp. : 
580 PRINT [ CNH6CHH5SPCHM FRfl M NNET " 
: PRINT [" EN][ 1 1 CH](F ) FRfl FIL :PRJNT 
590 RETURN 
600 POKE I 99.0 
610 GETflt:lFFlt = THEN610 
620 RETURN 

630 PRINT DflTflFK NflUN? : [ NPUTQE*: DE t =DE 
t* .P.U : RETURN 

640 OPEN1 .8.1 .DEt:GOSUB690: IFER 063THEN6 

80 

B3B r'RINI:PRlN!Ef1*:PR|NJ 'SK.RHJ OVER ? : G 
OGUB690: IffHO J'flNDfliO N THEN650 
660 CL05E1 : IFfl*= N THENGOSUB630: GO TO640 
670 Kt'- S: '*DEi:PRINTBlS.Kt:GaTO&40 
6«0 RETURN 

690 INPUTBlS.ER.Eflt.ET.ES: IFER<2B0RER=63 
THENRETURN 

700 PR INT 1 GRN)[ RFUH CN 1 xx*x>rxxxrxxx xxsx 
FT I L xxxx**xx*xxmxxxxxx{ UHTJC 2CN3" I PRIN 
.TER.EUt .ET.ES 

710 CL0SEUCLQSE2: CLOSE 15: END 

7 20 I =B:OUt= ■ 

730 RF.flUB: IFB = -1THENRETURN 

740 OUt-OUttCHRtC B 1: J - J tB: G0TO73B 

750 PATP2B, 0. 110. 0, 129. 75. 17B. 48 

760 DP.TFU64. 55. 58. 135. 66. 58. 139. 6 

6 

770 DFITFU 78 , 171 
18 

780 DflTA58. 128. 
750 D0TP.65. 170. 73. 
B08 0ATA73. 170. 49, 
0 

810 DftTn66 . 58. 130. 
828 DP.Tfl5B. 137. 49. 
838 Oft TO 1 30 
840 0OTfl83. 179 
70 

950 DPTP69 
860 UA1A81 
870 UP.!A7t 
880 DPTP41 
2 

890 DflTfl50. 53. 54. 58. 128. 0. 129. 8 
*M0 Urtt/lUCa, 0. 71 . 17B. 1B. 5S. 112.-1 



49. 167. 141 . 49. 51 , 
0. 63. 8. 120. 0. 151 



B. 135. 



44 . 
58 . 

58 . 
49. 
65 , 



66. 58. 73. 
74, 178. 74 

141 . 49. 51 
48. 0. 119. 
83, 58. 139 



177. 74. 167. 153. 



178 
17 

48 

a 

65 
34. 



73. 76. 32. 73. 32. 69. 65 



65. 83. 69. 84 . 78. 73. 
32. 58. 34. 194. 40. 54 



78 
51 



170. 191 . 40. 54 . 52. 41 . 17 



KONTROLSUn FOR L [STNING 1 



180 


161 


lie 


172 


1 28 


225 


130 


35 


140 


128 


150 


I 12 


160 


150 


165 


13 


170 


178 


180 


t54 


190 


109 


200 


179 


210 


18 


220 


116 


738 


142 


240 


1 35 


250 


I 02 


760 


16 


270 


198 


280 


1 12? 


290 


147 


300 


142 


310 


51 


320 


113 


330 


153 


310 


79 


356 


35 



40 



390 


34 


400 


42 


410 


139 


150 


184. 


460 


13*1 


470 


61 


480 


166 


49e 


151 


500 


69 


310 


52 


520 


143 


530 


124 


540 


232 


54 5 


105 


550 


i42 


560 


242 


570 


64 


590 


131 


590 


142 


600 


149 


61 0 


1R0 


620 


HZ 


630 


203 


640 


62 


658 


72 


668 


105 


670 


121 


600 


142 


690 


32 


700 


14 


710 


215 


720 


36 


730 


147 


740 


15 


750 


15 


760 


132 


??e 


176 


780 


202 


790 


79 




129 


910 


70 


820 


232 


830 


63 


84 0 


17B 


950 


234 


660 


252 


870 


9 


880 


101 


890 


21? 


900 


21 







LlSTNING 2 



100 P0KE52.48:P0KE56.48:CLR:REfl SENK TOP 

OF HEnORY TIL 12288 
110 GOSUB170:PRINT [ LLR ) : REN SKRIU NOE 
PAA F0RSTE SKJERH 

120 FOR I ■01022: PRINT DETTE ER EN SKJERH I 
fill :NEXT 

130 GOSUB200:PRINT [ CLR 1 : RE" SKRIU NOE 
Pnn ANDRE SKJERfl 

!40 FORI r0TO22:PRINT "DETTE ER EN MELT AN 
NEN SKJ ERI1 MM! : NEXT 

1 50 GOSUB230: G0SUB1 70 : GOSUB230: GQSUB200: 

GUrQ150 

160 END 

170 P0KE53272 . (PEEK 1 53272 jflNOl 5 3CJR224: RF 

fl LEGG SKJFRn I %3800 (14336J 

180 P0KE648.14336/256:RE(1 FORIELL BftSIC 

MUDR SK.if PfFN LJGGER 

IS0 RETURN 

200 POK E53272 . I PEEK C 532 72 1AN0 1 5 JOR24 0: RE 

II LEGG SKJERfl I «3CB0 t 15360) 

210 POKE640, 15360/256: REH FORTELL BASIC 

HUOR 9KJFRHFN LJGGER 

220 RETURN 

730 FOR I =0 TQ700' NEXT : RE lURN 



USININU 3 



100 VM =12298: GOTO230 

1 1 0 P0KE56 .46: P0KE52 .46: CLR: G0SUB1 70 
120 P0KE5G334 .PCEKf 56334 1P.N0254 
130 P0KF1 .PEEKC MAND251 

140 FORI -0TO4 095 ; POKE! *1 2288 .PEEK C 1 +5324 
9 ):NEXT 

150 POKEl -PEEKt 1 WR4 

160 P0KE56334 .PEEKC56334 30R1 : END 

170 P0KE53272 , (PEEKi 53272 3AND240 )0R12:RE 

TURN 

190 FORJ -0TO3:POKE251 r 3 .PEEKt43*I ):NEXT 
200 POKE44.48:POKF43.0;POkE45.0:POKE46 .6 
4 

210 SAUE CHARSET .8.1 

720 P0KE43 .PEEK C 251 ): PDKE44 .PEEK ( 252 J : PD 
KE45 .PEEKC2S3 ): P0KE46 . PEEK C2S4 J: END 
230 REflDNRi:NR=ASC(NR* ): [ FNR = 255 THENNR = 1 
26 

240 I FNR > I 91 ANON R < 224 THENNR =NR-36 
250 I FNR>224 THENNR =NR-64 
260 I FNR <64 THEN2 90 

270 IFNR>95ANQNR <12BTHENNR =NR-32 ; GOTO290 

280 NR=NR-64 

290 TA=CHi-NRi*B 

300 FORI =0TO7: REflDHei 

310 PO=0;flD = 256:f ORJ =1 T08: A0=AD/2: IFH10t 

CHE* , J . 1 ) = ' » THENFO-pO*AD 

120 NEXT J: POKETfltJ .PO: P0-255-P0: POKETfi^ I 

* 1024. pa 

330 NEXTI : PRJ NTNRt: f REU) :NRi 
340 REN 

350 oflino 

360 DATA' 

370 DATA xx xx 

380 DATA " 

390 DATA T 2SPC]X-»i*l2SPC1 ' 

400 DATA **[ 2SPC]** 

410 DATA *[6SPC1* 

420 DATA *I4SPC]* 

430 DATA r 2SPC1H2SPC]*[2£PC3' 



KONTROLSUri FOR L 1 STN ING 3 



KONTROLSUfl FOR LlSTNING 2 



100 


154 


1 10 


155 


120 


42 


130, 


127 


140 


223 


150 


29 


160 


123 


178 


77 


190 


52 


200 


146 


210 


163 


220 


Z00 


230 


247 


240 


196 


250 


34 


260 


1 38 


270 


239 


280 


7 


290 


0 


300 


249 


310 


114 


320 


246 


330 


18 


340 


143 


350 


7 


360 


3 


370 


3 


399 


3 


390 


239 


400 


239 


410 


219 


420 


219 


430 


219 



100 


73 


110 


251 


120 


248 


130 


171 


140 


213 


150 


143 


160 


129 


170 


1 04 


100 


235 


190 


142 


200 


111 


210 


233 


228 


142 


230 


102 
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Indtastningsvejledning 
for Commodore 64 & VIC-20 




De programmer, der trykt er i RUN 
ser lidt anderledes ud end du er 
vant til at se pa din skserm el ler prin- 
ter. Det skyldes. at vi har anvendt et 
scerligt printprogram. der»oversaet- 
ter« de grafiske tegn til et mere Ise- 
seligt sprog. VI bederdig derfor la?- 
se indtastningsvejledningen onv 
hyggeligt Igennem, for du starter 
med at indtaste dine programmer. 



Alle de grafiske tegn er i vort printpro- 
gram sat mellem to kantede parente- 
ser, og du skal saledes IKKE indtaste 
disse parenteser eller det. der star 
imellem. Du skal Irykke pa den eller de 
taster, der svarer lil det, der er skrevet 
mellem parenteserne if!g. skemaet 
her pa siden. Star der et tal umiddel- 
bart efter den ferste kantede parentes. 
skal de pagaaldende taster trykkes del 
anlal gange, der star skrevet. 
Stcir der SPC mellem de kantede pa- 
renteser. trykker du pa rnellemrums- 
tast. Star der et tal foran SPC ? trykker 
du tasten det antal gange. 

Du vil ogsa komme ud for. at der 
imellem parenteserne f.eks. star S/A - 
i sa tllfaslder trykker du pa SHIFT-ta- 
sten og A. Havde der i stedet staet C/A. 
skulle du have trykkel pa Commodore- 
ttasten og A. Ogsa i disse tilfaelde, kan 
der v/aere et tal, der angiver antal gan- 
ge 



Kontrolsum 

I programmerne til Commodore 64 er 
der knyttet et sSkaldt kontrolsums- 
program, der kan lette fejlfinding ved 
indlastning, Fremgangsmaden ved 
brugen af dette program er fslgende: 

1 . Du starter med at indtaste kon- 
trolsumsprogrammet og gemmer det 
til fremtidig brug. 

2. For indtastntngen af de svrige 
programmer starter du med at indleese 
kontrolsumsprogrammet . 

3. Sa indtaster du dit program. 

A. Tag altid en kopi af dit program, 
inden du tester det. 

5. Skriv GOTO 62000 og besvar de 
spergsmal, som programmet stiller. 

6. Sammenlign de kontrolsummer 
med de. der er trykt i bladet og find de 
tinier, hvor du evt. har tastet fejl. 

Almindelige rad. 

Vaar meget ornhyggeiig med ind- 
tastningen. og specielt nar det drejer 
sigom desakaidte DATA-linier. En fejl i 
disse linier kan forarsage. at compute- 
ren »gar I baglas« og du bliver nedt til at 
slukke for den. 

Derfor endnu en gang; tag en kopi af 
dit program, inden du karer det. 

Hvis computeren giver en fejlmed- 
deleise i en linie, hvor der findes en 
READ-kommando. kan du vsere nse- 
sten sikker pa, at fejlen IKKE skal fin- 
des i den pageeldende linie, men der- 
imod i en af DATA-linierne. 

Hvis du indtaster en programlinie. 
der fylder to linier pa skesrmen fuldt ud, 



(80 tegn) vil cursoren springe ned i den 
tredje linie. Et tryk pa RETURN-tasten 
her vil IKKE indleese den pagseldende 
linie. Du er i sa tilfaslde nodt til at trykke 
cursoren en eller to linier op, far du 
trykker pa return. 

Programmerne I RUN 

Programmerne, der er trykt t RUN. er 
testetogkan funktionere. Da program- 
merne mange gange er ret komplice- 
rede, kan vi ikke 100% udelukke, at et 
program i en specie) situation vil kunne 
opfere sig uventet. Dette er dog ikke 
normal!, og i sa tilfaalde vH redaktionen 
naturligvis vsre taknemmelig for en 
SKRIFTLIGorierttering. Derimod skul- 
le der ikke tsengere vaere nogen tek- 
nisk fejlmulighed i proceduren fra 
diskette/band til trykning i bladet. 
Eventuelle rettelser og korrektioner til 
programmer eller artikler i RUN vil sa 
vidt muligl blive bragt i det efterfalgen- 
de nummer under rubrikken RUNA- 
MOK. VI bederlaaserneom IKKE at ret- 
te telefonisk henvendelse om disse 
ting. 

RUNs redaktion kan heller ikke pa- 
tage sig telefonisk at vasre Iseserne be- 
hjaalpelige med fejlfinding ved Indlast- 
ning eller tvivlssporgsma'! om pro- 
grammerne i det hele taget. Hvis man 
har Isest sinbrugervejledningog feslger 
denne vejledning, skulle indtastningen 
at programmerne ikke give de store 
problemer. 

God fornejelse. 
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Narduser 



trykkerdu 



Skaerm 



CCLRJ 

CHOil] 

[ CO] 

CCN3 

CCU3 

C CM 3 

EREU3* 

C OFF 3 

CBLK3 

CWHT] 

C RED] 

[CYNJ 

CPUR] 

CGRN] 
CBLU] 
C YEL] 



SHIFT 



CLR/HOME 



SHIFT 



SHIFT + 



CTRL 



CTRL 



I CTRL 



CTRL 



CTRL 



CTRL 



CTRL 



CTRL 



CLR/HOME 



CRSR A 



CRSR ▼ 



CRSR ^ 



CRSR ► 



[CTRL 



[CTRL I | 6 



c 

□ 
E 
II 

a 



s 
u 

L 

1 
□ 
□ 

Si 



C ORG 3 
[ BRN3 
CLTRED3 
CGR1] 
C GR2 3 
CLTGRN3 
C LTBLU] 
C GR33 
CF13 
[F2] 
CF3J 
[ F4J 
CF53 

CF6] j SHIFT 

CF7] 
CF83 



SHIFT + 



SHIFT 



Lid 




n 

u 


LkJ 


1 — 


n 


in 

LkJ 


1 




1 <H 


1 * 1 




L£J 


1 * 1 
1 5 1 


■n 

E 


|o| 


[ — z — 1 

1 6 1 


■1 


|c=| 


7 | 


□ 


El 


nn 


■ ■ 



(3 



f5 



is 
ii 

51 
■I 



SHIFT + 



17 



62900 REM KONTROLSU.1 PRCGRAP 

620) 0 UOSUB 67058 

62020 GOTO 52200 

62030 IF FL>=0 THEN 62020 

62010 END 

62050 DEf FN DEfJCCX) = PEEKCX H256*PEEt«X 
62865 DfiTfl **x 

7? 0 ot> D £ Tfl l65 ' 257 - 166 * 253 . 133.020. 134.0 
* 1 . 032 ,019- 

67080 DATA 166,716,160.001,177.095,133 2 
5*1 .210.013 

S2 a ?So mTfl 708 • 1 ? 7 • 095 • 1 33 • 252 ■ 200 • 1 ?? . 0 

lib , 1 33 ,253 

nB^aB^M 70f, - 16S ' 000 ' 133 - 23 l .W.B95.2 

62110 UftTA 101.753.700.208.744 096 
62170 WTA -l 
62130 AD = 52932 
62140 RESTORE 

62150 READ Ti: IF 7*<>"W THEN 62158 
5216H READ T : IF 1 j =0 THEN POKE PD.T I 
AD = ACJ+1 : GOTO 62160 

pi!^cr P . 1 . NT " CCLRJHU0R KOMTPOLSUp 
rRINTET : 

621R0 INPUT - TUITION 1 TOR =0 PRINTER^ PLOTT 
Ek=6 DEO 
62190 RETURN 

62200 REP DO iNITfiLlSATJON 
62210 FL r 0 : 1NPUT " F 0RSTE LINE 
? IF FL<0 THEN RETURN 

WrfctnSg* 1 INPUI LWE 

62230 IF OEU>0 THEN OPEN 1 ,DEU 



FL 



62240 LN = fl : C = 0 : CI J 0 
62250 POKE 252.LN-IWT(LN/756J*2S6 : POKE 
753.LN/-256 

52)+? 52992:CS=P££KC25I3:LM=F N0EEKC2 

622P0 Ti * LEFTiCSTRiCLN-1 )+~C6SPCJ " ,6 Jt 

LEFT i(STR4 CCS 1* "C7SPCJ " .7 1 

62260 IF DEU = 0 THEN PRINT Ti; 

62290 IF DEU>0 THEN PRINT»1,T4; 

62300 IF DEU=0 THEN C = C+ 1 : IF C>*3 in 

EN PRINT : C = 0 : Cl = CI ♦ 1 

62310 IF OEU>0 THEN C = C+l : IF C>=3 TH 

EN PRINT*! I C - 0 ; CI = CI + 1 

62320 IF LN<=LL F»ND PEEKC2S4) THEN 67750 

62330 IF DEU>0 THEN PR I NT* 1 : CL0SE1 

62340 END 



•CONTROL SUP 










€2000 


5 


670 IP 


170 


62070 


163 


62030 


17? 


6704W 


3 28 


62050 


173 


67060 


33 


67070 


30 


67080 


38 


62090 


«4B 


67100 


31 


671 10 


14 


67170 


1 


621 10 


130 


67140 


140 


62150 


167 


62160 


29 


67170 


65 


621 80 


277 


621 90 


142 


67200 


58 


62210 


47 


62770 


139 


62730 


77 


62740 


13 


67250 


707 


67760 


255 


62270 


183 


677 SB 


191 


67790 


250 


62300 


114 


62310 


161 


67320 


137 


62330 


39 


67340 


128 
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cnouoNm co c 

/ Ul\l II IIIULU\L 



a a a 



Kobenhavn 



FONA COMPUTER CENTER 

Hlum, A sal 
Qstorgade 52 
1001 Kobenhavn K 
Tefl : 01-144002 

FONA 

Ostergade 47 

1 100 Kobenhavn K 

Tell ; 01-159055 



FONA COMPUTER CENTER 

Skindorgada 41 

1 159 Kobenhavn K 

ToH: 01-110707 



FONA 

Vesierbrogado G2 
1520 Kobenhavn V 
Tell 01-249300 



FONA 

G) Kongevai US 
1850 Kobenhavn V 
Totf. 01-210893 



Storkobenhavn 

DATACARE 

Tarnvej 151 
2610 Rodovro 
Tell,; O1-7O50W 

FONA 

Falkoner Alle 58 
2000 Frederiksberg 
Ten 01-352122 



MIBOLA MIKRODATA 

Osiefbrogacte H7 
2100 Kabenhavn 0 
TeH.. 01-183366 



FONA 

Oslerbrogade 80 
2100 Kobenhavn 0 
TeH 01-421010 



FONA 

Norrebrogada 34 
2200 Kobenhavn N 
Tod : 01-377788 



FONA 

Norrebrogade 174 
2200 Kobenhavn N 
Tetf: 01-830345 



FONA 

Amagorbiogade 49 
2300 Kobenhavn S 
TeW.- 01-572131 



FONA 

Amagerbrogade 126 
2300 Kobenhavn S 
Tell 01-553600 



FONA 

S'indbyveater Plads 1-3 
2300 Kobenhavn S 

TeH 01-559662 



FONA 

Fredef kssundsve) 38 
24O0 Kobenhavn NV 
Tell.. 01-190186 



LAMIF1 DATA 

Solskraanien 33 
2500 Valby 
Telf 01-16D299 



FONA 

Valby Lenggade 56 
2500 Valby 
Tell 01-163O45 



FONA 

Hovcdvejen 65 
2600 SlOStnjp 
To".; 02-457077 



FONA 

R odovTG Centrum 131 
2610 Rodovre 
Tell . 0M11777 



FONA 

Cily 2 - 206 
2630 Tasirup 
Tell 02-521525 



POULSEN COMPUTERCENTEH 

Crty 2 - 304 
2630 T&slfup 
Tell. 02-990577 



FONA 

lsho| Bycenter 32 
2635 Isho) 
Tell 02-730?33 



FONA 

Hvidovre. Stalion&cenler 37 
2650 Hvidovre 
TeW ; 01-471621 



FONA 

Sirandrnarksvei 20 
2650 Hvidovre 

Te«.: 01-490711 



FONA 

Greve Center 83 
2670 Greve Strand 
Ton.. 02-9OC455 



FONA 

Hundie Storcenter 9 
2670 Greve Slrand 
TeW.: 02-900790 



JMOATA 

Sandbakkon 27 
2660 Solrod Strand 
Ten 03-144573 



FONA RADIO A/S 

16 

Frodonk53undsve| 330 
2700 Brortshoi 
Tefl ; 01-26:7000 



FONA 

FreCenkMunasve; 154 
2700 Bronsho| 
TeH.: 01-282728 



FONA 

Jernbane Alle 39 
2720 Vanlosc 
Ten. 01-743518 



FONA 

Havnegade 21 A 
3600 Fredenkssund 
Telf 02-311515 



| Syd- og Midtsjaelland 



FONA 

Herlev Bygade 2l 
2730 Herlev 
Tell 02-946 7B7 



FONA 

Cenlrumgaden 26 
2750 Ballerup 
TeW . 02-654455 



FONA 

Lyngby Slorcenter 38 
2800 Lyngby 
Tell.. 02-871134 



FONA 

Soborg Hovedgade 56 
2860 Soborg 
Tell 01-561765 



FONA 

Strandvejon 161 
2900 Heilerup 
Tell 01-611422 



FONA 

Hovedgaden 14 
2970 Horsholm 
Tell. 02-864166 



FONA 

Algade 1? 
4000 Rostolde 
Ten : 02-36S633 



DATARINGEN 

Tune Cenlret 
Amestien 12 
4000 Roskitde 
Tell 02-139100 



Nordsjselland/Bornholm 



BOL DATA 

Set CHaigade 4? 
300C Heismger 
TeH. 02-100211 



FONA 

Slongade 53 
3000 Heistngor 
Tell. 02-210918 



FONA 

Siotsgade 25 
3400 Hiliorod 
Tell.-. 02-260133 



BO-EL DATA 

Tsmsborgve) 19 

3400 Hi Iter od 
Ten : 02-263131 



FONA 

Farum Bylorv 1 1 
3520 Farum 
Tell 02-955088 



U.I.B. ELECTRONIC A DATA IMC. 
ApS 

Liilovangs-vel 3. Accacletorvet 
3520 Farum 
Tan. 02-95617O 



FONA 

Vest si 3D Hands Center '5 
4200 SUtgeise 

Tell. 03-520916 



FONA 

AWgade 61 
4300 HolbaBk 
Ten 03437510 



FONA 

Norregaoe 1 
4600 Koge 
Tetl 03-650058 



FONA 

Set Pedera Klrheplads 1 
4700 NSesived 
Tert 03-727122 



Fyn med omliggende 
oer 



FONA COMPUTER CENTER 

Veste/gade 61 
5000 Odenae C 
Tell. 09-125603 



FONA 

Tarup Center 
5210 Odense S0 
Tell 09-150123 



FONA 

Roaengardaceniret 34 
5220 Odanse SO 
Tetf . 09-159755 



FONA 

Vottgade 7 
5700 Svondborg 
TeH 09-211785 



Vest- og Sonderjylland 



FONA 

Heliigkorsgado 2 
6000 Kolatng 
Ten 05-627755 

FOTOHUSET A'S 

Sartdorgade 4 
6000 Koidmg 
Ten.. 05-520044 
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FOTOHUSET A'S 

Bispegade 7 
6100 Hadarstev 
Tell 04-521319 



FOTOHUSET A/S 

Norrepori 19 
6200 Abenro 
Tell. 04-626601 



FONA 

Ramsftorred 41 A 
6200 Abenr* 
Tell 04-622344 



FONA 

69 

Perlegade 30 
6400 Sonderbofn 
Tell 04-421013 



FOTOHUSET A/S 

Perlegade 49 
6400 Sends rborg 
Tell W-423265 



FONA 

Kongensgade 60 

6700 Esbjerg 
Tell 05-130133 




Midtjylland 



FONA 

Qolhersgade 12 
7000 Frederic* 
Tell. 05-922955 



FOTOHUSET A/S 

Gothersgade 19 
7000 FredencHi 
Telf ■ 05-922454 



FONA 

Norregade 29 G 
7100 Vejle 
TeH. 05-827268 



FOTOHUSET A/S 

RAdhustorve? 2 
7100 Vojle 
Telf 05-822337 



FONA 

Bfedgade 17 

7400 Hetning 
Tcrt. 07-124455 



FONA 

Norregade 30 

7500 Holslebro 

TeH 07-425611 



Ostjylland 



FONA COMPUTER CENTER 

BanegSrdsgade 16 
8000 Athus C 
Tell 06-132222 



FONA 

Guidsmedegadc 15 
8000 Arfius C 
Telf 06-122777 



FONA 

M.P Bruunsgade 43 



8000 Arhus C 
Tell 06-i3ia57 



FONA 

SonOergade 16 
BOOO Arhua C 
Tetf 06-131724 



FONA 

C<ty VqsI 243 
3220 Brabrand 
Tejr 08-253011 



FONA 

Sandergade 17 
8600 Sllkeborg 
TeH 06-925733 



FONA 

Sonde rgado 
6700 Hotsens 

Tell.. 05-628000 



FONA 

Gel MathJas Marked 305 
&HOO Vlborg 
T«ll. 06-625P66 



FONA 

R.4dnusstrasde 13 
8900 Randerx 
Toll 06-427533 



DATA RING EN 

Sloisgade 4 
Slotscenitet 
8500 Banders 
Tell.; 06 413777 



Nordjylland 



FONA 

Nibeveg 27 A. Skalborg 
9200 Aaiborg SV 
Telf 08-184310 



LEO VINTER DATA 

Kvissel 

9900 Ffedeilksnavn 
Til. 08 - 48 4 6 44 




TAL TIDSSKRIFTER 
MED MUNKSGAARD 

- det ved vi nogel om . 



Munksgaardhar Danmarkssierste tidsskriftafdeiing 
mod ca . 50.000 abon nementer ; sa uanset det drejer sig 
om BYTE, COMPUTERWORLD. DATAMATION , 
NATIONAL GEOGRAPHIC MAGAZINE eller at andet 
tidsskrift. kan vi tormidle abonnementet. 

Foratkunneyde den oedste service, be tjenervios a1 
den mesiavancerede EDB-teKnik pa on-line basis 

Vtl De hore mere om de mange lordele ved al piacere 
tidsskrifiabonnernenler hos os - s£ ring eller skriv id 



MUNKSGAARD TIDSSKRIFTSERVICE 

NorreSogade35 ■ l370KaOenhevnK ■ Til. (01 ) 1235 70 




Verdens hurtigste operativsystem 
til din CBM 1541! 

• Op til 20 x HURTIGERE LOADING" 

• Indbygget 2 MINI. BACKUP-PROGRAM! 

• Formattenng pa 11 SEKUNDER! 

• Indbygget RESET-KNAP' 

• Mere end 20 NYE BASIC-KOMMANDOER! 

• Krsever INGEN INDGREB I DJN COMPUTER! 

• FYLDER INTET i HUKOMMELSEN! 

• 100% hardware-baseret! 

• Indbygget BASIC 4.O. DOS-KOMMANDOER 1 

• Langt HOJERE DATASIKKERHED! 

• MARKEDETS SUVER/ENT BEDSTE 1541 -TURBO' 

Pris: 985,- incl. montering. 

Eneforhandler & distributor: 




Postboks 28 - 2980 Kokkedal 
Ordretelefon (02) 24 26 58 • Ma-so kl. 8.00 til 22.00 



i idc nui\ijui III. 



Af Flemming Lerbeek 



En hel verden a* inform ationer og 
sjove oplevelser ligger henslum- 
rende i de fleste computere, som 
i dag star og udforer deres blip-bat 
hjemme i dagligstuerne. Men for 
relativt fa kroner, kan man i dag fa 
adgang til denne spaendende ver- 
den. 

Her pa RUN vil vi gerne tage hul pa 
det informationssamfund. alle siger 
kommer. For nar vi holder af at sige. 
at vi er med pa" noderne, nar det 
gaslder Commodore, ma vi ogsa 
kunne se lidt fremad. Sa hvorfor 
vente pa hybridnettet: Informati- 
onssamfundet er her allerede - 
omend i det sma. 

VI vil derfor i denne lille rubrik 
itomme med specielle informalioner 
til alle. der bruger deres computer 
til andet og mere end bjemmeoko- 
nomi.Her vil komme oplysninger. 
som kan interessere alle nuvaa- 
rende og kommende ejere af en 
computer og en eller anden form for 
modem. 

Hvad er s4 et modem? Ja. popu- 
lar! kan man sige. at med med et 
modem kan man fa forbindelse med 
omverdenen. Modemmet ornsaatter 
computerens digitale oplysninger til 
elektriske impulser, som kan sen- 
des via ledninger - f.eks. telefonled- 
ninger til de fjerneste kroge af vor 
klode. 

Du er velkommen til at skrive til 
RUN med oplysninger, der kan bru- 
ges i rubrikken. Her pa RUN vil vi sa 
behandle stoffet redaktionelt, og 
har det mteresse for en bredere 
kreds. tager vi stoffet med 

Vi vil ogsa lobende komme med 
oplysninger om nye programmer, 
nye modems, nye telefonbaser og 
mailboxe bade her og i odlandet. 
Ligeledes vil vi komme med gene- 
relle indlaag om informationsteknik 
og nye rnader at transportere infor- 
mationer som f .eks iysledere. 

Rubrikken er ikke bare rettet 
mod de, som er brugere af en com- 




puter, men ogsa mod de. som bare 
tasnker pa at kobe en. Intormations- 
samfundet er noget alle kommer 
med i - hvad entenv de vil eller ej. 
Bjerge af informationer gemmer sig 
allerede pa den anden side compu- 
terens userport. Det vi onsker, er at 
hjaslpe med nogle af de praktiske 
oplysninger. som giver adgang til 
denne fagre nye verden. 

Et praktisk eksempel 

For at give et eksempel pa, hvilke 
ting, man kan bruge sin computer til 
allerede i dag. vil vi komme med en 
kort beskrivelse af en af Danmarks 
mest interessante databaser - ikke 
mindst for de teknisk inter- 
esserede. 

Danmarks Tekniske Bibliotek 
(DTB) har databasen ALIS. Den er 
beskrevet i Teledata systemet. som 
kan kaldes via telefontjenesternes 
••Teledata-. ALIS er et -on line litte- 
ratur lokaliseringssystem-. 

Systemet bestar af en utrolig 
masse data om forskellige former 
for trykt materials Wan har adgang 
til at soge pa, f.eks. alle boger. kon- 
gresberetninger. rapporter. serie- 
publikationer. disputatser og meget 
meget andet, hvis det findes pa 
DTB. 

Desuden kan man soge pa tiller 
og oplysninger pa de ca. 12.000 
tidsskrifter. DTB rader over. Ligele- 
des kan man soge pa de bogsamlin- 
ger, der findes i de tekniske biblio- 
teker i Arhus og Sonderborg. 

Der kan ogsa soges pa uden- 
landske databaser gennem ALIS. 
Man kan fremskaffe kopier eller re- 
kvirere selve vaerkerne. som DTB 
rader over gennem systemet. 



Hvad kosler det sa? Det er fak- 
tisk gratis! Forudsastningen er en 
hennvendelse til DTB pa adressen: 

DTB 

Anker Egelundsvej 1 
2800 Lyngby 

Tlf. 02-883088 lok. 4886/4934 

Forudsaetningerne 

Vi vil i de kommende numre komme 
med bud pa udstyr, der er nodven- 
dig for at komme i kontakt med om- 
verdenen. Vi vil starte rned en af de 
mest kendte tilbud - nemlig TELE- 
DATA, derfor de fleste vil vasre den 
forste database, man kommer i 
kontakt med. 

Det er teleadministrationernev 
(FKT/KTAS/JT). der tilbyder en lang 
rsekke kontakter til egne og eks- 
terne databaser lige tra nummerop- 
lysningen. leksika. bankerne. vej- 
rudsigten og meget andet. Teledata 
muliggor bestilltng af varer og tjene- 
steydelser af vidt forskellig slags. 
Men mere om det senere. 

Konkrete planer 

RUN vil desuden komme med en 
raskke numre pa sakaldte mailboxe 
- aits& databaser, som man kan 
komme i kontakt med via telefon- 
nettet og fa f.eks. programmer, re- 
klamer og meget andet tilsendt en- 
ten elektronisk her og nu, eller 
sendt med posten senere. 

RUN har ogsa planer om at op- 
rette en egen database, hvor las- 
seme kan hente bladets egne pro- 
grammer samt alle de "public do- 
main-' programmer, som vort Inter- 
nationale tilhorsforhold abner mu- 
lighed for at hente fra hele verden. 
Men det vender vi tilbage til! ■ 
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Commodore- MARKED 



Printerborde 
RABAMI Serie 230 




Truil^s uaffieengig hejderegulenng 
af savel skaerm- som tastaturplade. 
Overfiade. brandfast raelamin i eg, 
teak eller modehvid. AQR- 
Leveres knock-down. 
Forsendes pr. efterkrav over hele 
landet. 

REKLAMEHUSETAIS 

Eongevejs Centret 6 * 2970 Horaholm 
tlf. 02-57 20 00 



Fa mere ud af 
din Commodore 
hjemmecomputer 

Dansk Tidsskrift med tips 
og id6er. 

Pravenummer tilsendes. 

Basic Programmering 

Narholmvej 8 
8740 Brsedstrup 

Tlf. 05-76 15 18 



Commodore specialisten 
Byens billigste! 

Commodore 64 
SX-64-C16* Plus/4 
Diskettestation1541 

Printer MPS-801 

Printer MPS-802 
Monitor 1701 

Erhvervsprogrammer. lege programmer, 
tilteher. EDB-borde. 



Vi hardei hele! 



Ring og fi 
etgodttitbud 



MIBQUk 

/WKRODATk 




Spar 231,- 

RABAMI 230 
COMPUTER- 
BORD 

Normalpris 729,- 
Hvid og Eg 



Spar 147,- 

RABAMI 
SKRIVE- 
MASKINE- 
BORD 

Hvid og Eg 



RING OG 
BESTIL 
IDAGH 

Forsendes knock 
down over hele 
landet. 



498- 428- G 

JL^rKjy ^?m*%Jm REKLAMEH 



Incl. moms 



Incl. moms 



REKLAMEHUSETAIS 

Kongevejs Centret 6 • 2970 Horaholm 
Tlf. 02-57 20 00 



Salgsafdelingen 
Blakildecentret 18 
2630 Tastrup 
02-99 93 71 



LITTERATURSERVICE 

SA-170 Mark Andrews- Commodore 64/128 Assembly 
Language programming. 

Engelsk 320 sider. Howard Sams 1985, kr. 250.00 
SA-107 Timothy Knight: Commodore 64 Graphics and Sound 
Engeisk BAND/BOG. Howard Sams 1984. kr. 334.00 

SY-144 Richard Allen King. Multiplan on Commodore 64 
Engelsk 225 sider. Sybex 1985, kr. 299.00 

PE-304 Poul Pavelko: The Master memory Map for Commodore 64 
Engelsk 190 sider, Prentice Hall, kr. 150.00 

PE-507 Robert Williams: Power of CalcResult for Commodore 64 

Engelsk 195 sider, Prentice Hall, kr. 326.00 
C & B Mikrodatainformation har Danmarks sterste udvalg af Computerlitteratur. 

FOR LANG BOGKATALOG 
Vi har mange nedsatte boger tif VIC 20 (rekvirer bogliste). 
Bagerne leveres fragtfrit over hele landet. 



< < null 8C del 2 




Af Henning Randmose 

Der er to vigtige betingelser. der 
skal vaere- opfyldt, for man begyndei 
at skrive programmer. Den forste 
er, at man har et rimeligt godt kend- 
skab til programmeringssproget og 
til editoren (redigeringsfacifciteter). 
Den anden. at man har en metode 
til planlaegnmg af et programforlob. 
Da skolen er lagt sadan til rette, at 
ingen af disse forudsaelninger be- 
hover at vsere opfyldt, er vi I sagens 
natur nod til at starte der. 

Du vil andetsteds i bladet f inde et 
»snydeark«. Start med at klippe del 
del ud, lim del evt. fast pa et stykke 
pap. sa holder det lasngere. Laeg 
den med hullet i midten over funkti- 
onstasterne, og den anden op bag 
tasterne. Du har nu en hurtig over- 
sigt over Comats editor, leg Isdt med 
de forskellige muligheder, de er alle 
med til at gore ISvet lettere. nar der 
skal indtastes programmer. 

Der er en ting mere, vi lige skal 
sikre os, nernlig at vi forstar hinan- 
den. Jeg vil derfor give en »popula- 
riseret" forklaring pa nogle af de 
tegn og »ordrer««, der er brugt i pro- 
gramme! Nedenstaende vil allsam- 
men referere til programme!, sa det 
vil vaere praktisk , hvis du da naen ner 
det, at tage siden ud, og have den 
ved siden af. inden du laeser videre. 

Selve programme! udregner 
porto, og du skal fors! svare pa, om 
det, du vil sende, er e! brev, tryksa- 
ger eller en smapakke. Du skal der- 
efter indtaste vaagten i gram , sa for- 
tasller programme! dig. hvor meget 
portoen er. Der sker ingen udreg- 
ninger i programme!, kun sammen- 
ligninger, sa det skulle derfor vaere 
nogenlunde let at ga til. 

Variabler 

Vi starter gennemgangen med at se 
pa noget, der findes i ethvert pro- 
gram, variabler. 

I simpel form findes der 5 typer. 
Vi skal her kun beskeeftige os med 
3 af dem. De! er heltalsvariabler, va- 



riabler for reelle tal (som jeg her- 
efter vil omtale som decimalvariab- 
ler). og sa tit sidst tekstvariabler. De 
to vi springer over, er den hexadeci- 
male og den binasre. idet arbejdet 
med dem ligger langt over denne 
skoles ambitionsniveau. 

En heltalsvariabel, der som nav- 
net antyder, bruges i forbindelse 
med hele tal - eks.vls 10, 17 eller 
4339 - den genkendes pa. at de! 
sidste tegn er #. 

Decimalvariabler bruges i forbin- 
delse med (ja, du gastter det aldrig) 
bade hele tal og decimaital, Deres 
saerlige kendetegn er. at de ingen 
har. De slutter med enten et tal eller 
et bogstav - bade -porto- og »s4« 
er af denne !ype. 

Tekstvariabler kan bruges i for- 
bindelse med bade tekst og tal, 
men da en tekstvariabel opfatter tal 
som bogstaver, kan du ikke udfore 
regneoperationer med den, for den 
er "omdobt" til decimal, mere 
herorn senere. En tekstvariabel 
kendetegnes ved. at sidste tegn er 
$. 

Hvad bruger man sa en variabel 
til? Jo, tasnk pa en skuffe. i hvilken 
man som bekendt kan gemme for- 
skellige ting. Hvis det er en stor 
ting, ma du vaelge en stor skuffe, og 
er det en I tile ting, er du derimod frit 
stillet. Det samme med variabler, de 
er de skuffer, i hvilke du gemmer 
dine data i. Nu er computere fodte 
-ordensmennesker-, de lillader 
kun, a! du gemmer erj ting i hver 
»skuffe«, og da ••skuffeantallet-< 
(pladser t computere ns arbejdsla- 
ger) er begraenset, skal man altid 
vaelge den mindste skuffe. Senere 
kommer vi ind pa indicerede variab- 
ler, taank pa dem som skuffer der er 
rumopdelt, og hvor man sa kan ud- 
nytte rumopdelingen til a! gemme 
ensartede ting med en i hvert rum. 
Hvis du ser pa «PRQC vent" i pro- 
qrammet, kan du se, at jeg bruger 
heltalsvariablen va1g# til at be- 
stemrne, hvad der skal gemmes i 




tekstvariablen tekstS. Forst i pro- 
grammet bruger jeg f.eks. decimal- 
variablen b1 til at gemme normal 
brevporto kr. 2.80 I. Variabler skal 
altid begynde med et bogstav. men 
efter et bogstav mi du gerne bruge 
tal. Du ma derimod ikke bruge et 
reserveret ord som f.eks. PRINT til 
en variabel, men gerne P1RINT. En 
takstvariabel kan du ogsa skrive 
med tal. eks.vis a123$. 

Sammenlignende operatorer 

Tegnet < belyder mindre end. Eks. 
IF gram<20 THEN porto: = b1 

(hvis det. der er gemt i gram, er 
mindre end 20, sa er porto det 
samme. som det der er gem! i b1) 

< = mindre end eller lig med 
= lig med 

> = siorre end eller lig med 

> storre end 

< > forskellig fra 

Nok om det for denne gang, nu 
til planlaegningen af programme!. 
Jeg ptantegger i sakaldt pseudo- 
kode. populsert sag!, skriver jeg 
struktur og programforlob paalmin- 
delig dansk. 

Alt i programmet foregar i en 
lokke-struktur. hvilket populaert vil 
sige, at det korer i ring, og btiver ved 
med det. indtil udgangsbetingelsen 
er opfyldt. - er TRUE (er sand). Jeg 
har her valgt lokken LOOP, og sa 
lasnge betingelsen i EXIT WHEN 
ikke er sand, korer den I ring, og 
udforer det, der star mellem LOOP 
og ENDLOOP i den raskkefolge det 
star. For at lokken ikke skulle btive 
uoverskuelig, har jeg lagt nogle 
specialopgaver ud som saarskilte 
procedurer og funktioner, sa de bli* 
ver hente! ind, efterhanden som der 
Oliver brug for dem. 

Pseudo kode 

start skaerm 
rens skasrm 
1) vaelg det onskede 

hvis det onskes, sa stop pro- 
gramme! her 
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hvis ikke stop, sa vis det valgle. 
indtast vsegt 

2) check at vsegt er indenfor lovligt 
omrade, hvis ikke, sa afvis. ellers 
fortsast 

3) udskriv nodvendig porto 

4) hold pause indtil der Oliver tryk- 
ket en tast 

start forfra 

1 ) PROC vent : her far styrevariablen 
valg# sin vasrdi, enten 0, 1 , 2 eller 
3. I CASE strukturen sorgen 
OTHERWISE (ellers) for at du. hvts 
ikke nogen WHEN (nar det er) er 
sande. ikke kan kornme videre for 
du har indtastet et sandt udsagn 
(tal). WHEN sorger sarntidig for at 
folgeteksens variabel tekstS. far 
den rigtige vasrdi. Da proceduren i 
OTHERWISE kalder sig selv, kaldes 
den med etfint ord, en rekursiv pro- 
cedure. 

2) PROC fejl; den er kun aktiv, hvis 
du indtaster en vaegt over 1000 
gram, eller en vasgt pa 0. eller en 
negativ vaagt. Jeg har valgt at 
stoppe programmet, hvis du ikke 
onsker det, skal du i stedet for END 
med efterfolgende tekst. skrive 
pause, og du vil fa pausefunktionen 
ind. Laeg mserke til. hvordan variab- 
len tekstS og ordren END er brugt. 

3) FUNC udregn(type# .gram): jeg 
har valgt en funktion, for at fa en 
sadan med. En procedure kunne 
have udfort det samme. blot pa en 
lidt anden made. Hvad angar for- 
skellen pa en funktion og en proce- 
dure, sa venter vi lidt med den for- 
klaring, da den er nemmere at for- 
sta, nar du har set flere forskellige. 
Du har sikkert alierede bemasrket, 
at det der star I parantesen i funk- 
tionshovedet er anderledes, end 
det der star i funktionskaldet i linie 
790. Variablerne er sakaldte para- 
metre, da de i funktionskaldet inde- 
holder en vasrdi. (typett.gram) er 
formelle parametre. de indeholder 
ingen vaardi," for funktionskaldets 
(valg# ( v33gt) overforer en kopi af 
deres inidhold til dem. valg# og 
veegt beholder altsa deres vaerdi, og 
kopien i typett og gram har kun 
vaerdl, indtil RETURN porto har re- 
turneret resultatet retur til funkti- 
onskaldet. Fortvivl ikke. hvis du ikke 
har forstaet det hele, det vil blive 
taget op hver gang i lang tid frem- 
overJF x THEN - enkeltstrenget be- 
tinget udforelse hvis x-betegnelsen 
er sand sa udfor ... 



Flerstrenget betinget udforelse: 

IF gram >=20 AND gram<100 
THEN proto = b2 

(hvis vasrdien i gram er storre end 
eller lig med 20, og vaardien i gram 
er mindre end 100, sa sast vaardien 
i porto til det samme som vasrdien 
i b2) 

AND er et logisk OG, begge ud- 
sagn skal va?re sande for at porto 
far nogen vasrdi. 

OR er et logisk ELLER 
IF vsegt <=0 OR vaegt>1000 
THEN fejl 

(hvis vserdien i vasgt er mindre end 
eller lig med 0, eller vserdien i vaagt 
er storre end 1000. sa udfor proce- 
duren fejl) 

Nar man bruger OR , er det nok at 
et af udsagnene er sande. for at ud- 
fore det betingede udsagn. 

Multiforgrening 



IF x THEN rigtig forkert 
EUF x THEN — | — | 
ELIF x THEN 

IF x THEN — — 

IF x THEN 

ELSE — — 

ENDIF 

ELSE 

ENDIF 



IF kan oversa&ttes som -hvis", 
THEN som »sa udfor/gor--, ELIF 
som -eller hvis«. ELSE med »el- 
lers», ENDIF som -ikke Here betin- 
gelser-. 

Prov at oversastte ■►FUNC ud- 
regn« pa samme made som oven- 
staende. og du vil se, at den er nem 
at Icese 

4) PROC PAUSE: Denne procedure 
skal vi bruge igen og igen. sa den 
skal du gemrne sasrskilt pa enten 
band eller disk med ordren LIST 
»pause». Hvordan vi sa skal hente 
den frem igen. kommer vi senere til. 
Det proceduren -pause- gor, er at 
den stopper al videre programudfo- 
relse. indtil der bliver nedtrykket en 
tast. Pausen styres af funktionen 
KEYS, der mange gange hvert se- 
kund, aflaaser indtastningsbufferen, 
og sa lasnge den er torn, returnerer 
den veerdien chrS(O), og da alle ta» 



sternes CHRS vasrdi er storre end 
0, er det ligegyldigt hvilken, der bli- 
ver aktiveret for at prograrnudforel- 
sen fortssetter. 

Nu er vi kommet sa langt, at du 
skal til at taste programmet ind Der 
er dog lige et par ting, der skal for- 
klares forst. 

Du skal starte med at indtaste 
folgende: print units <return>. 
Funktionen UNITS returnerer nu det 
lagringsmedie, der er aktiv Ved op- 
start er det diskettestationen med 
drev 0, sa hvis du bruger disk, ska* 
du ikke foretage dig mere nu, men 
hvis du bruger bandoptageren ind- 
taster du: unit »cs>. Nu vil alle or- 
drer til lagringsmedie ga til din 
bandoptager. 

Det folgende er en god lille fidus. 
og den skal alle taste; 
use system < return > 
defkey(3 ( »save«'@» porto»13«) 

Ovenstaende har omdefineret 
funktionstast 3. sa nar du trykker pk 
den, bliver det af programmet. du 
har indtastet, SAVED automatisk. 
Tegnet @ for porto gor. at det al- 
tid er den nyeste version, der gem- 
mes, da den overskriver den gamle. 
Tag tiden og gem dit program hver 
gang, du har skrevet f.eks. 50 Ifnjer, 
for der er ikke noget mere aerger- 
ligt. end at miste det hele pa grund 
af stromsvigt e.a. 

Det sidste du skal gore, inden du 
starter pa programmet. er at taste: 
use dansk. Du vil nu, hvis du skulle 
kornme til at indtaste en forkert syn- 
taks, fa din fejlmelding pa dansk. 

Du starter indtastning af pro- 
grammet med at taste f4 (AUTO) 
< return >, og ser nu linjenummer 
0010 pa skaarmen. Det der star efter 
// er kommentarer, og har ikke no- 
get med programmet at gore, sa det 
behover du ikke at taste ind, dog vil 
jeg rade dig til. at taste alle Mnjer fra 
og med 60 ind, da det, hvis du finder 
pa at lave en udvidelse. evt. med 
post til udlandet eller gebyrer, sa er 
rart at have alle variabel-navne sam- 
let et sted, da du jo selv skal lave de 
nye. Du behover tkke indtaste THEN 
eller anforelsestegn slut (»). det 
sastter den indbyggede editor selv. 

Navnet efter ENDPROC og END- 
FUNK bliver ogsa" tilsat automatisk, 
nar de efter endt indtastning korer 
SCAN med f8. Gor det til en vane, 
at udfore et SCAN for du korer et 
nyt program, da SCAN undersoger 
programmet for struktur-fejl, og 
fortsa?ttes side 64 
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RUN SOFTWARE CLUB er et nyt, 
gratis tilbud til RUN's Isesere. 

VI har fra bladets start solgt 
band og disketter med program- 
mer, deT var trykt I RUN. Det var Ira 
starten ment som en ekstra ser- 
vice for iseserne og prisen var sat 
sa lavi som muligt. 

Imidlertid har interessen for vort 
programsalg vaeret staarkt sti- 
gende, ikke mindst pa grund af de 
lidt mere seriose programmer, vi 
forsogsvis har solgt ved siden af. 



Dette er grunden til, al vi nu star- 
ter RUN SOFTWARE CLUB, og vi 
haber hermed at honorere et onske, 
som mange af vore Isesere har givel 
udtryk for. 

Hvad er sa RUN SOFTWARE 
CLUB? Ja, i virkeligheden er det 
kun en fortsasttelse af det software- 
salg, vi hele tiden har haft. Det nye 
ligger i, at vi nu kaster blikket mere 
pa det halv- eller helprofessionelle 
marked for at finde gode program- 
mer til en overkommelig pris. 

Alle. der fra nu af kober band el- 
ler disketter hos os, bliver automa- 
tisk medlem af RUN SOFTWARE 
CLUB, og far tilsendt et medlems- 
kort. Der folger naturligvis ingen 
som heist forpligtelser med, men 
som medlem vil man, ud over de 
programmer der tilbydes i bladet, fa. 
ekstra tilbud pa speciel fordelagtig 
hard- eller software. 

Vi kan ikke pa nuva&rende tids- 
punkt sige, hvor tit disse tilbud 
kornmer, da det ogsa er afhaangig af 
de tilbud vi far 

Ikke en konkurrent 

Selv om det er vort mai. at tilbyde 
programmer lave priser, opfatter vi 
ikke os selv som konkurrenter til 
den eksisterende soflwarebrance. 

Vort udbud vil hovedsalig besl£ 
af de mange fremragende halvpro- 
fessionelle programmer, der findes. 



Desuden vil vi tilbyde nogle af de 
programmer, som vore sosterblade 
i USA, Tyskland og Spanien har ud- 
viklet. 

Endelig vil vi. nar vi far et godt 
tilbud, seelge helt professionelle 
programmer som de tre spil, vi tilby- 
der denne gang. 



Hvordan bestiller man 

Vore priser skulle heist vsere sa lave 
som muligt, og derfor er de baseret 
pa forudbetaling. Dette giver mindst 
mulig administration og den hurtig- 
ste ekspedition. 

Det nemmeste er at ga pa post- 
huset og udfylde et girokort med dit 
eget navn og adresse, vores navn 
(RUN. Torvegede 52. 1400 K) og 
vort gironummer ( 48 31 61 ). Du 
skal selvfolgelig ogsa huske at 
skrive praecis. hvad det er, du be- 
stiller. 

Naturlivis er du ogsa velkommen 
til at sende en check eller kobe di- 
rekte pa vores adresse. 



Hvilke programmer 

Vi kan i ojeblikket tilbydefolgende: 
CAULDRON (se annonoe) 
VALKYRIE (se annonce) 
EVERYONE'S a WALLY (se an- 
nonce) 

PRIVATREGNSKAB kr. 195.00 band 
eller diskette 

REGNSKABSSYSTEM (i Comal se 
RUN nr. 6) diskette kr. 375.00 
TIPSPROGRAM (udvidet - se RUN 
nr. 6) band eller diskette CBM64/ 
VIC-20/PLUS4/C16 kr. 195.00 
SYSTEMN0GLER TIL TIPSPRO- 
GRAM band eller diskette kr. 118.00 
RUN Nr 1 1984 
RUN Nr.2 1984 
RUN Nr.3 1984 
RUN Nr.1 1985 
RUN Nr.2 1985 
RUN Nr.3 1985 
RUN Nr.4 1985 
RUN Nr.5 1985 



RUN Nr.6 1985 
RUN Nr7 1985 

15 BEDSTE PROGRAMMER FRA 
RUN 1. AR. (kun diskette) 

Alle disss programmer fra bladet 
fas pa band (kr. 98,00) eller diskette 
(kr. 118.00) 

TIPSSYSTEMER PA DISKETTE 

Til RUN's tipssystem kan vi nu til- 
byde et band eller diskette med 10 
fantastisk gode tipssystemer, der 
kan indlasses at RUN's TIPSPRO- 
GRAM. 

Folgende systemer ligger pa 
bandet/disketten; 

RM 6-4-1296 udskrevet pa 9 kupo- 
ner 

RM 8-2-2916 udskrevet pa 36 kupo- 
ner 

RM 10-0-2187 udskrevet pa 27 ku- 
poner 

R 8-0-81 enkeltraakker 
R 7-4-96 enkeltraekker 
U 7-2-261 udskrevet pa 31 kuponer 
U 9-0-481 udskrevet pa 31 kuponer 
U 13-0-145 udskrevet pa 37 kupo- 
ner 

UM 6-2-324 udskrevet pa 41 kupo- 
ner 

Prisen for alle disse systemer er 
kr 118,00. og de kan leveres til 
CBM64/VIC20/PLUS4/C16 pa en- 
ten band eller diskette. 



Opdatering 

Kobere af RUN's programmer har 
altid rot til gratis opdatering af pro- 
grammer, der er videreudviklet eller 
rettet for evt. fejl. 

Betingelsen er blot, at man ind- 
sender originaldiskette/band med 
frankeret svarkuvert. ■ 
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Mdnedens spii 
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Commodore 




DfflflTIPIMIG 



Af Jorgen Jorgensen 
Onsdag den 4. September 1985 re- 
praesenterer et vendepunkt inden- 
for tipningen. Den dag holdt Dansk 
Tipstjeneste pressemode i Falko- 
nercenteret, hvor de pra?sente- 
rede de datakuponer, der har vae- 
ret omgivet af sa meget hemmelig- 
hedskraemmeri. 

Fra samme dag ville det ogsa 
vaere tilladt at bruge disse kuponer. 
hvad de fasrresle af gode grunde 
var ude af stand til. Dansk Tipstjene- 
ste havde indgaet et samarbejde 
med Commodore for at teste kupo- 
nerne. 

Commodore havde pa det grund- 
lag lavet nogle printrutiner. for at fa 
anbragt krydserne rigtigt pa kupo- 
nerne. Der er lavet printrutiner til 
MPS 801. MPS 802 og DPS 1120. 

Krydsmarkeringerne til 801'eren 
er ganske vist i underkanten af det 
"lovlige- 1 , men er dog i lighed med 
de andre godkendt af Tipstiene- 
sten. 

Udskrivningen er for 80Verens 
vedkommende en meget langsom- 
melug affasre. Selv i en kompilet ud- 
gave foregar det i snegletempo, 
men der er selvlolgelig heller mgen 
der siger, at man behover at kikke 
pa det hele tiden. 

De to andre printere udforer ar- 
bejdet i et betydeligt hurtigere 
tempo, og speciell er typehjulsprin- 
teren god. 

RUN har ogsa provet 801 -rutinen 
pa en SEIKOSHA SP 1000 VC. og 
resultatet var hurtigere end pa 
801'eren, men ikke sS hurtig som 
MPS 802. 

Printerrutinerne kreever foigende 
variabter; 

RK%(13.10) Ved enkeltraskke er 1 = 
1, 2=x og 3 = 2 Ved systemrsekke 
skal kun 13x3 felter udfyldes og her 
sseiter et 1-tal krydset og 0 ingen- 
ting. 

AR Antal raBkker Enkeltraekker 1- 
10 og systemkupon 0 




NA$ Fornavn + efternavn max. 30 
tegn 

ADS Adresse 

PNS Postnummer max. 4 tegn 
BYS Bynavn max. 20 tegn 

Vendepunkt for tipningen 

Pa pressemodet var alio enige om. 
at datatipningen betegner et vende- 
punkt for systemtippere og et stor 
opsving tor tipsklubberne. 

Carsten Andreasen fra Tipsbla- 
det mente ogsa. at computere ville 
skyde op som paddehatte rundt om 
hos torhandleme. 

Denne optimisme kunne Tipstje- 
nesten ikke dele, og jeg mener hel- 
ler ikke, at computerne har nogen 
fremtid hos torhandierne. 

Det bliver uden tvivl pa hjemme- 
fronten, det f£r betydning, og mon 
ikke der star mange printere under 
juletrseet i ar. 

RUNs tipsprogram 

Ved samme lejlighed fik vi nu mulig- 
hed for. at afslutte vores eget tip- 
sprogram. Alle illusioner om at 
bygge printerrutinen sammen med 
tipsprogrogrammet brast pa grund 
af begge programmers pladsbehov. 

Vi har I stedet matte lave et spe- 
cielt printprogram. der kan indlaese 



enkelt- eller systemraekkefilen fra 
tipsprogrammet. Det fungerer ogsa 
tint, selv om del havde vaarel srnar- 
tere, at kunne bygge det hele sam- 
men. 

Ved indtastningen af systemer. 
skal man angive antal enkeltraakker, 
antal systemkuponer, antal hel- og 
halvgarderinger. Man indtasterforst 
helgarderinger enkeltrsekker. der- 
naest helgarderinger systemrask- 
ker, halvgarderinger enkeltraakker 
og endelig halvgarderinger system- 
raakker. 

For udgangsraskke-systemer 
skal man ogsa mdtaste det nogle- 
tegn, der ligger til grund for garde- 
ringerne. 

Her retter man med F1, afslutter 
med F5 og accepteret med F7. 

Nar de enkelte raakker skal be- 
regnes, skal man huske, at indtaste 
udgangsraakken for systemopstil- 
lingen. 

Printerrutinerne kan anvendes af 
alle computerne. dog skal rutinen 
llnje 20000-20020 for PLUS4/C16's 
vedkornmende erstattes med ruti- 
nen 20000-20020 fra RUN 6 side 44 

Af pladsmasssige grunde kan vi 
kun afslutte for C64'erens vedkorn- 
mende, og ma vende lilbage med 
de andre nseste gang ■ 
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COMMODORE STILLER MED 

DET ST/ERKESTE HOLD 
TIL EFTERARETS TIPSKAMPE 





Nu Br deter: Data-UpskuponemelTrytn iendeieseoaner 

lil udskrivnlng pa din hiemmecomputeis printer . Oet Mty- 
do, at du kai iHtekroe sysiomftuponer p3 minuttei, 
tivor del lor tog timer. 

Commodore hat slilWI el hold med alle de starkeSc 
pjolessionolte C 64. diskoflestatiort 1641 og printer SOI. 
Hvts du aflerede har dam. s3 ska) du kun Investore i spIvu 
prognmmei for at vara med j kampen am millioneme. 

Hvis du onflnu Wke har en hiemmecompirter. si 
begynd med Commodore C 64 - systemlipnfng er bare el 
af mange omrader, hvor dot er penge og lid al spare 
* og rjone! 

Undga tipsferartipe. lip med Commodore - del er 
oven i kobel bifligere. end du for - speclofl hvis I ei litre, 
dfii 0 samfrten Ring tit 05-64 1 1 55 OQ I adressen 
pa nsrmesle loitiandler. Og ga sA md ogj la en urundig 
demonstration. Del er hurtigt, neml og spandende, 
oghvem ved... 



Cflmttwdort 64. 

Supervdetse Hi tavpris. Stor lagerhapacilPl. nojoplosnaigsgraf* (16 larveil, 6? lorskellige 
graftfco tegrt oq 3-Kemmirj musiksynthesieer 18 oktavei). 




Commodore 

Ford! fremtfden farl&ngst 
erbegyrxft. 



► Fortsat 1 ra side 49 

hvls der er nogen, fortasller den dig 
hvor. og hvad der skulle have stdet. 

Nar du i programme! ser tegnene 
kolon. lighedstegn ( =). sa taster 
du kun lighedstegnet ( = ). kolon til- 
ssettesogsa automatisk. Fordu ko- 
rer programmed s3 gem det for en 
sikkerheds skyld pa disk eller band. 
Tast nu f7 (RUN), og del skulle 
gerne kore, hvis du skulle fa en fejl- 
melding. sa tast f5 (EDIT), + det 
linjenummer, der star i fejlmeldin- 



gen + < return >. Linjen bliver nu 
udskrevet, og du kan rette fejlen. 
slut med < return >. 

Programme! kan skrlves bide 
fiksere og kortere. hvad du selv 
snarl vil kunne se, men da ideen 
ikke er. at kopiere programmer, 
men laere at skrive dem, sa gor vi alt 
(her i begyndelsen) pa den om- 
steendige. men overskuelige og let- 
tere forstaellge made, Hvis der 
skulle vasre noget, du ikke helt har 
faet fat pa, sa forstar du det maske 



naestegang. Provf.eks atasndreen 
linje l programmet (lad vsere at save 
det asndrede. for du er sikker pa. at 
du loretraekker den version - eller 
gem den under et andet navn). 

Hvis nogen skulle have specielle 
onsker, si send dem pr. BREV tit 
RUN's redaktion. maarkel Cornai 
Jeg vil ikke iove noget, men hvis det 
passer ind / skoJen. vil de blive taget 
op. ■ 



8010 //por lo CRUN's Comal 80 skole. 1995 
. Pra 1 ) 

0029 //demo af IF x=x THEN toir llerstren 
qet udsagn med ELIF . ELSE 09 END IF 

0030 //saml al IF x=x THEN som Uerstren 
get udsagn 

00*10 //demo a I CASE f WHEN . OTHERWISE 09 

ENDCASE strukturen 
0050 //demo at LOOP . EXIT WHEN 09 ENDLOO 
P 

0068 //der er brugt fjgende variabler: 

bl til b5, 11 t 1 1 1 5, si t 1 1 s4 

0070 //tekstt. val9«type»Crelererer til 

hlnonden), v-oet/gram (ref.tlt hlnandenJ 

0088 // 09 pOTl 0 

0090 // 

0l08bi:=2.8; b2:=3-8; b3; =6; b4 — 10; b5 

:=13 //brevtakster 

0110 ll:=?.5s I2:=3.5: t3:=5.5; t4:=3; t 

5: =12 //takstsr (or trykcager 

0120 si:=3.5: s2:=5.5: s3: =9; »4:=12 /A 
akster for sm-opakker 
0130 // 

0140 PROC pause CLOSED 

0150 PRINT AT 24.1: " "IB-far forte Ifct 

« I se . t ryk en last 

0160 WHILE KEY4=CHRiC0J DO NULL 

0170 ENDPROC pause 

0180 // 

0190 PROC fejl 

0200 PAGE 

0210 PRINT AT 10.1: "Kan ikke snedes s 
otn " ,t okst * . ' , da" 

0220 PRINT 'v|9t ikke indemfor tilladt 
e 9 r |ns«r . " 

0230 END "Tryk "18"f7"146" for forts»t 

br I u 9 " 
0240 ENDPROC fejl 
0250 // 
0268 PROC went 

0270 INPUT AT 16.1.1: '"IB "tad t al lo 

r UD.I9: "146" "s vatgp 

02S0 CASE ualg" OF 

0230 WHEN 0- 

0300 PAGE 

0310 END 

8320 WHEN 1 

0330 tekcti: = breuo" 

0340 WHEN 2 

0350 I ekst s : = "t ryksaacr " 

0360 WHEN 3 

0370 t ekst %'• - sm^pakker" 
0380 OTHERUISE 
B 190 uenl 

0400 ENDCASE 
0410 ENDPROC uent 
0420 // 



0430 FUNC udresnClxpeo.gramJ 

0440 porioi=0 

0450 IF type«=l THEN 

0460 IF gram-^B THEN porto:=bl 

0470 IF 9 ram>=20 AND gram<100 THEN p 

or t o : =b2 

0480, IF gram> = 100 AND gram<250 THEN 
p or I o : =b3 

0490 IF 9ram>=250 AND 9ram<500 THEN 

P'OTt o : =b4 

0500 IF gram>=500 AND 9ram<=i000 THE 

H po r 1 0 : =b5 

0510 ELIF type"=2 THEN 

0520 IF 9 ram<20 THEN porto:=tl 

0530 IF gram>=20 AND gram<100 THEN P 

orlo: =12 

0540 IF 9ram>=100 AND 9ram<250 THEN 

por t 0 : =t 3 

0550 IF 9ram>=250 AND 9ram<500 THEN 

port 0: =t4 

0560 IF 9ram>=500 AND grttm<=l000 THE 

N porta : = t 5 
0570 ELSE 

0580 IF graro<l00 THEN porto:=sl 

0550 IF 9ram>=100 AND gram<250 THEN 

port 0 : =s 2 

0600 IF gr&m>=250 AND 9ram<500 THEN 

por t o : = s3 

0610 IF gram>=500 AND grafr.< = l000 THE 

N port o : ~s 4 

0620 END IF 

0630 RETURN porto 

0640 ENDFUNC udregn 

0650 // 

0660 LOOP 

0670 PAGE 

0680 PRINT TA8C 123. ' 18"bere 9 n in 9 af p 

or t o " 

0690 PRINT (AT 4.12: "0 stop bru9 af pr 

ogram" 

0700 PRINT AT 6.12: "1 brewporlo" 
0710 PRINT lAT 8.12: 2 tryksaser" 
0720 PRINT AT 10.12: "3 sm^pakker" 
0730 vent 

0740 EX I I WHEN valg»-0 

0750 PRINT fSJ 18.1: ' jeg arbejder nu m 

ed .tekst % 

0760 INPUT AT 20.1: " 18'lndtast u|gt 
l gram: "146" "■: «j 1 9 1 

0770 IF ul9t<=0 OR u|gt?100» THEN fejl 
0780 PRINT AT 22.20: "porto er ", 
0730 PRINT USING "18" kr. »■.«*": udr 
c9nCual9 B ."-'l9t ) 
0800 pause 
0810 ENDLOOP 
08Z0 /✓ 
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INPUT/OUTPUT 



Af Tor Engebakken 




INPUT/OUTPUT er RUNs laser- 
brevkasse, hvor du har mulighed for 
at fa svar pa nogle af de problemer, 
du gar og tumler med. 

Desvaerre kan vi ikke na at besva- 
re alle de breve, vi modtager. Vi 
pro ver a t fa sa mange med som m u- 
tigt og udvaelger dem, vi mener, der 
harbredest interesse. 

Commodore-interesserede, som 
har sporgsmal eller tips at bidrage 
med, kan skrive til Tor Engebakken, 
Brandvoldgatan 1, 2000 Lillestrom. 
NORGE. 

INPUT 

1) Jeg ville vasre glad, hvis du kunne 
forklare mig fidt om data-llnier. Hvad 
gor maskinen med dem. og hvad er 
de udtryk for? 

2) Hvad betyder en data som 329, 
da den er stone end 255? 

3) Er der forskel pS DA TA i et Basic- 
program og et maskinkodepro- 
gram? 

4) Hvordan virker forresten kontrol- 
sum? 

Jeg venter med laangsel pS s var. 
da jeg laser INPUT/OUTPUT mere 
end een gang, du giver nogle super- 
gode svar hver gang. 

Med ven/ig hilsen 
Knud E. V. Lausten 
Odskservej 20 st.th. 
8800 Viborg 

OUTPUT 

1) DATA-sastninger er en made at 
lasgge Informationer ind i et pro- 
gram. For at give en variabel en 
vaerdi, kan vi skrive en raskke ud- 
sagn af denne type: 
10 AS = »TEST«:A=134:B= 12345 

En srnartere og mere effektiv 
made er at bruge DATA-sastninger. 

Programmet ser pa de forskellige 
DATA-saetninger som en sammen- 
hsengende liste, og nar programmet 
finder en READ-kommando, vil det 
finde frem til det element pa listen, 
som ska I laases. Forste gang en 



READ-kommando udfores, vil det 
forste DATA-element blive leest ind. 
Nasste gang vil element nummer to 
lasses ind osv. 

Ovenstaende Imje vil derfor 
kunne skrives pa" denne made: 
10 READ A$,A,B 

Derudover ma vi have en DATA- 
sastning. som indeholder de va*r- 
dier, variablerne skal have. 
20 DATA TEST, 134, 12345 

I dette eksempel er der ikke sa 
meget at spare, og saarlig effektivt 
bliver det forst, nar vi skal indlaase 
en maengde DATA, som har en eller 
anden logtsk forbindelse. Hvis en 
-array med strenge skal indlaeses, 
ville det blive et unodvendigt stor 
arbejde, at give hvert enkelt ele- 
ment en vaardi. Da er det bedre at 
laagge indlaasningen i en lokke, og 
lade programmet laese fra en liste 
med DATA-saetninger. 
Eksempel: 

10 FOR I = 0 TO 10 
20 READ A$(l) 
30 NEXT I 

40 DATA J0RGENSEN.GRITH- 

,CARSTEN,TOR,PREBENSEN,HE- 

STENES.LIV 

50 DATA FLEMMING.ROBIN.HEN- 
NING,BJARNE 

Den samme teknik bruges, nSr vi 
skal liste et maskinkodeprogram i et 
blad. 

Da der ikke er nogen direkte 
made at liste dette pa, laver vi heie 
programmet om til DATA-saatnin- 
ger, som kan ligge i et Basic pro- 
gram. Den harde metode er at PE- 
EK'e det ud. som ligger i adres- 
serne, og derefter skrive det ind i et 
program som DATA-saatninger. 

Den mere enkle metode er at 
lade et program gore arbejdet for 
dig. Der findes utallige »DATAMA- 
KERS-. og listning 1 er endnu en 
udgave. Foruden at lave datasaat- 
ninger, laver det ogsa den nodven- 
dige rutine for at laagge de enkelte 
data pa plads i hukommelsen. 
2) Da et DATA-element kan vaare et 



hvilket som heist tal. er der ikke no- 
gen principiel forskel pa tal, som er 
storre eller mindre end 255, men da 
en adresse ikke kan indeholde tal 
storre end 255. kan vi Ikke POKE tal 
tnd, som er storre end 255. 

3) DATA-linjer i et Basic-program er 
blot en made, at repraasentere for- 
skellige vaardier pS. Hvorvldt disse 
tal skal POKE'S ind i hukommelsen 
(som i et maskinkodeprogram), el- 
ler bruges som vaardier i et saadvan- 
ligt Basic-program, er ganske uv«e- 
sentligt. DATA'ene er de samme, 
men maden de bruges p£ er for- 
skellig. 

4) I indtastningsvejledningen i RUN 
er der en god beskrivelse af, hvor- 
dan du bruger kontrolsummen til at 
fa dine programmer tastet rigtigt 
ind. 




INPUT 

He/ Tor 

Jeg er 15 Sr. og har en Commodore 
64. Jeg har nogle sporgsm&i til dig. 
som jeg hSber. du kan svare pSog 
evt. give mig et eksempel. 

1) Hvordan kan man undgS, at et 
maskinkodeprogram LOAD'es ab- 
solut, oVs. til den adresse der er / 
headeren (adresse 829-832)? 

2) Kan man flytte sksermen uden at 
flytte karakterssettet? 

3) Findes der boger om bandopta- 
gerens virkemSde? 

PS forhSnd tak for svar 
Per Andersen 
Rahbeks Have 52 
4300 Ho/baek 

OUTPUT 

1) Egentlig kan man ikke foretage 
en relokeret LOAD fra bandoptage- 
ren. Hvis vi f.eks. fra maskinkode 
abner en fil (JSR SETLFS) med Y- 
reg. lig med #$00. vil programmet ^ 
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fremdeles LOAD'e sig ind efter m- 
formationen i headeren. 

Der er irnidlertid en enkel. om 
end noget primitiv made at gore 
dette pa. 

Nar et program LOAD'es ind fra 
bandstationen, vil maskinen forst 
"blanke" skearmen. og derefter ind- 
Isese en header, som Indeholder in- 
formation om navnet pa program- 
mel. start og slutadresse etc. 

Derefter stopper bandstationen, 
og skaarmen vil igen blive synltg. Pa 
skaarman vil der hu sta FOUND 
PROGRAM. Efter en kort tid, vil del 
egentlige program LOAD'es ind. 

Headeren ligger i kassettebuffe- 
ren fra 828 til 1019, og indeholder 
folgende information: 
Adr.828: Hvad slags information 
(uvgesentlig i denne sammenhasng). 
Adr. 829-830: Programmets starta- 
dresse. 

Adr.831-832; Programmets sluta- 
dresse. 

Adr.833-848 : Den synlige del af nav- 
net. 

Bare en lille kommentar til 
adresse 833-848 Nar du lagrer et 
program, kan du godt bruge et fil- 
navn, som er laangere end 16 bog- 
staver. Nar du sa LOAD'er dette ind 
fgen, vil navnet tilsyneladende kun 
besta af de 16 forste bogstaver, 
men selv om dette tilsyneladende er 
del eneste, der kommer frem pa 
sksermen. vil resten af navnet stadig 
ligge i kassettebufferen. Prov dette 
eksempel: 

SAVE »DETTE ER EN TEST OG 
EN HEST- 

Nar du loader programmet ind 
igen, vil der sta: 

FOUND DETTE ER EN TEST, 

men resten af navnet er pa ingen 
made borte. Skriv folgende: 

FOR I = 833 TO 1019 : 
PRINTCHRS(PEEKO)); : NEXT, 

og resten af navnet vil komme 
frem! 

Nar maskinen har fundet pro- 
grammet. og sksermen kommer 
frem, kan vi afbryde LOAD'ningen 
ved at trykke pa RUN/STOP-tasten. 
Vi kan riu se efter. hvilken slags in- 
formation, der ligger i headeren, og 
evt. forandre den. hvis vi onsker 
dette. 

Onsker vi, at programmet skal lo- 
ade sig ind et andet sted. kan vi nu 
forandre start- og slutadresserne i 
829-832. Efter at have gjort dette. 



kan vi skrive SYS 62828, og pro- 
grammet vil LOAD'e sig ind pa det 
nye sted!!! 

2) Skeermen kan flyttes uden at 
ftytte karaktersaettet. Video-chip'en 
kan irnidlertid kun »se« 16K ad gan- 
gen, saledes at den nye placering af 
skaarmen ma ligge indenfor dette 
omrade. 

Det er de fire nederste bits t 
adresse 53272, som bestemmer. 
hvor skaarmen skal ligge indenfor 
denne 16K bluk. Formelen for at 
flytte sksermen er denne. 
POKE53272.(PEEK(53272)AN- 
D15)ORAVa3rdien pa »A« bestem- 
mer, hvor sksermen bliver anbragt. 
Se tabellen for, hvilke vaardier A kan 
an tag e. 

Derudover ma man huske at for- 
taelle editoren. hvor skaarmen skal 
ligge. Dette gores ved at finde den 
fysiske startadresse til skasrmen, 
og dele denne med 256. Det tal man 
far, laegges ind i adresse 648. som 
er adressens hignbyte. 

Hvis A i linjen ovenfor er 240, vil 
skaarrnen starte i 15360. POKE 
648.15360/256 vil saledes ordne 
sksermen s adresse. 



Et lille trick 

Denne mulighed for at forandre 
sksermens adresse kan bruges til 
mange ting. Et naerliggende eksem- 
pel kan vaare, at vi onsker at skitte 
to sksermbilleder i et hurtigt tempo. 
Det kan vasre menuer i et program 
eller maske som en del af en anime- 
ringssekvens. Eftersom Basic er sa 
langsom, vil vi kunne fa problemer 
med at forandre skaarmen i tilstraak- 
kelig hurtig tempo. Hvis vi derimod 
pa forhand har anbragt et par 
skasrmbilleder i hukommelsen, og 
derefter ikke forandrer billederne, 
men tvaartimod blot bytter om pa 
dem, kan dette forega t et tempo, 
som vil kunne tilfredsstille de flestes 
behov. Se listning-2 som et eksem- 
pel pa denne teknik. 

Hvis du muntrer dig med. at jong- 
lere mellem forskellige skaarme, ma 
du huske. at farvehukomrnelsen ma 
vcere faalles for de forskellige 
skaarme. da dette ligger pa samme 
sted, uanset, hvor skaarmen liggerl 

3) Jeg ved ikke, om der er nogen 
bog, der specielt tager sig af ban- 
doptageren. Det du formentlig gor 
klogt i, er at kobe en god beskri- 



velse af ROM-rutinen i 64'eren, da 
bandoptageren som helhad styres 
fra maskinen! 




INPUT 

He/ Tor! 

Det er sadan, at jeg har skaffet mig 
et Speed-Dos til min diskettesta- 
tion. og derfor ikke kan benytte min 
kassettebandoptager Problemet er 
sa, at /eg gerne vifle have Iagt mine 
programmer fra band til diskette. 
Nogle programmer har en lille Basic 
start, og disse kan standses ved at 
forandre den adresse, der stir i 43 
og 44, men hvis disse saves til disk, 
og derefter loade-s, er der koks i 
grafikken. Hvorfor? 

Andre programmer er 100% ima- 
skinkode rned auto-start - hvordan 
fSr man Iagt d/sse pa disk? 

Venlig hi/sen 
Henrik Boye Laursen 
Langebjerg 22 
2850 Nserum 

OUTPUT 

Jeg forstod ikke helt, hvad du 
mente med dit sporgsmal om pro- 
grammer med Basic-loadere. Det er 
lige sa vigtigt for mig som for dig, at 
sporgsmal (og svar) folges med 
nogle eksempler, saledes at det 
klart frerngar, hvad sporgsmalet 
gaelder! 

Jeg regner imidJertid med. at du 
vil have Iagt alle de spil , du har kobt, 
over pa diskette. Dette er en lidt 
pinlig situation. Samtidig med at du 
har betaltfor de spil, du har pa kas- 
sette, kan du ikke bruge dem laan- 
gere, desvasrre er de antagelig 
spaarret tor kopierlng alle sammen. 
Dette gores jo netop for at forhtn- 
dre, at de kan lasgges over pa di- 
skette! Piratvirksomheden er fare- 
truende hoj, og softwarehusene ma 
jo prove at beskytte sig pa en eller 
anden m&de. Det er selvfolgelig ikke 
umuligtat »knaekke« de spaarringer. 
som ligger pa spillene, men sporgs- 
malet er, om det er moraisk forsvar- 
ligt eller besvaeret vaard! 

I dit tilfaalde, vil jeg rade dig til at 
ga derhen, hvor du har kobt spil- 
lene, og sporge om du kan bytte 
dem til diskversioner. Har du en god 
forhandler, er det muligt at det lyk- 
kes for dig! 
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INPUT 

Keere Tor! 

Jegyil gerne vide, hvordan man fir 
sma bogstaver midt inde i et pro- 
gram? 

Hi/sen 

Jacob Staalfors 
Entghedsvej 40 
2920 Charlottenlund 



OUTPUT 

Jeg regner med. at du vil have skif- 
te! tegnsaettet fra det ssedvanlige til 
det med store og sma bogstaver. 

Dette gores ved, at have fol- 
gende linje i programmet: 
10 PRINT CHRS(14) 

For at fa bogstavsasttet tilbage til 
det normale, kan du skrive; 
10 PRINT CHRS142) 

Hvis du after at have lavet maski- 
nen om til store og sma bogstaver, 
ikke vil have at nogen skal saette 
tegnssettet tilbage ved at trykke 
SHIFT- og COMMODORE-tasten 
samtidig, kan du skrive: 
20 PRINT CHR5{8) 

For at gore det multgt igen. skri- 
ver du bare: 
30 PRINT CHR$(9) 




INPUT 

He/ BUN 

Jeg har nogte sporgsmSI angdende 
CBM64. 

1. Hvordan laver man egne grafiske 
tegn? 

2. Kan programmer til VIC-20 bru- 
ges til CBM64? 

Hi/sen 

NikoJaj Nikofajsen 
Qresundvej 80 
6100 Haderslev 



OUTPUT 

For at lave egendefinerede tegn, ma 
du forst Issgge karaktersasttet i 
RAM. Dette gores med en enkel 
programlokke. 



170 POKE56.46:POKE52,46:REM 
S ZENKER TOP AF HUKOMMELSE 
180 POKE53272,(PEEK(53272)AN- 
D240)OR12:RETURN:REM FOR- 
ANDRER TEGNSZET 
TOO POKE56334,PEEK{56334}AN- 
D254;POKE1.PEEK(1)AN- 
D251.REM KOBLER TEGNGENE- 
RATOR IND 

140 FORI = 0TO4095;POKEI + 

1 2288.PEEKI I + 53248) :NEXT:RE M 

LOGGER TEGNS/ETI RAM 

1 50 POKE 1 ,PEEK(1 )OR4;POKE- 

56334,PEEK(56334)OR1 

For at finde ud a(, hvad maskinen 
vise pa skaermen, -kikker- den efter 
I det omrade, tegnsaettet ligger. Et 
enkelt tegn opbygges af otte bytes. 
Nar hver enkelt byte har otte bit. 
bliver dette til en 8x8 punkt matrise. 
som vi kan opbygge et tegn inden- 
for. Hvis en bit i en byte er »sat», vil 
denne bit indenfor matncen komme 
til syne. Nar vi skal Isegge karakte- 
ren ind, ma vi derfor laegge vasr- 
dierne for de synlige bits sammen, 
og poke dern ir>d i hukommelsen 
(se i ovrigt tidligere numre af RUN). 

Hvis karaktersasttet starter i 
12288, vil de otte forste adresser 
vaere alfategnet. de nseste otte ad- 
resser vaare "A- osv 
76543210 

x x byte 1 

x x x x x x . byte 2 
x . x x . x byte 3 
x x x x x x . byte 4 
x .... x . byte 5 
X . - . . x . byte 6 
x x x x x x . byte 7 

x x byte 8 

Vi kan godt gore dette pa fri 
hand, men hvis du synes, det bliver 
lidt vanskeligt. gor listmng 3 det me- 
ste af jobbet for dig. 

Forklarlng til listning 3 

Programmet lader dig kopiere 
tegnsaettet til RAM, og forandre de' 
forskellige karaklerer. Hvis du vil 
forandre tegnsaettet til de stor/sma 
bogstaver, ma du forandre linje 100 
til: 

100 CH= 12288 + 2048 :GOTO230 

Forste gang du bruger program- 
met, skriver du RUN 110. 

Nar programmet har kopieret 
tegnsaettet over i RAM (det tager 
lidt tid), er du klar til at lave dine 
egendefinerede tegn. For at foran- 
dre pa en karakter. forandrer du 
blot dataiinje 350 til den karakter, du 
vil torandre 



DATA »K»vil forandre bogstavet K 
osv. 

Samtidig ma du forandre datalin- 
jerne 360-430 saledes. at du far det 
monster, du vil have pa karakteren. 
Derefter skriver du bare RUN, og 
karakteren vil asndre sig (den 
samme karakter vil ogsa fa en nega- 
tiv udgave). 

Nar du erfaerdig. eller vil tage dig 
en pause, gemmer du tegnsaattet 
ved at skrive RUN 190. Dette vil 
gemme tegnsaettet pa diskette. 
Hvis du vil have det gemt pa kas- 
sette. ma du forandre linje 210 til: 
210 SAVE "CHARSET'-.U 

Hvis du skal fortsaette med et 
tegnsaet. du allerede har gemt, LO- 
AD'er du forst tegnsaettet ved at 
skrive LOAD -CHARSET«,8,1 (eller 
.1.1 hvis det er kassette). 

Derefter LOAD'er du program- 
met ind, og skriver i direkte mode: 
POKE56,4G:POKE52,46:CLR 
POKE53272,(PEEK(53272)AN- 
D240)OR12 

Du er nu klar til at lave SPACE- 
INVADERS eller hvad du nu matte 
onske. Hvis du skal bruge karakter- 
sasttet i dil eget program, ma du 
LOAD'e tegnsaettet ind, og have de 
to ovenstiende linjer som forste 
linje i dit program. 
2) Programmer til VIC-20 kan som 
regel Ikke bruges til CBM64. 




INPUT 

Adskillige af jer har haft problemer 
med at fa TURBO-SAVE til at virke, 
og her folger sa losningen pa de 
problemer t har haft!!! 



OUTPUT 

Efter I har LOAD'et TURBO-SAVE'n 
ind, ma I forst skrive RUN, og deref- 
ter NEW. Dette vil fjerne linje 0. som 
er dukket op i nogle at jeres pro- 
grammer. 

Nar I skal laegge TURBO pa jeres 
gamle programmer, er det bare at 
LOAD'e dem ind pa saedvanlig vis 
(efter at have indlaest TURBO- 
SAVE, skrevet RUN og NEW!) Der- 
efter SAVE'r I dem med de nye 
kommandoer. 

I vil ikke kunne bruge VERIFY pa 
de programmer, som er SAVE'et 
fortsaettes side 64 
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J&tt bar for trtbte 
gang J§ 




Al Robin Sagar 

Velkomrnen til den 3. adventure 
side. Jeg har brugt den sidste ma- 
ned pa, at samle oplysninger om 
nye spil fra bade USA og England. 
Nogle at dem vil jeg beskrive her, 
og andre ma vente til et senere 
nummer al RUN. Der har ikke vae- 
ret meget laesestof i denne maned, 
men sa er der til gengaeld kommet 
sa mange nye, gode spil. 

Som jeg nasvnte i sidste nummer 
af RUN, bliver der flere og flere spil 
baseret pa boger. Alle de spil. som 
jeg kiggede pa er af denne slags. 

EXAMINE 

Jeg har modtaget 3 spil fra SPINNA- 
KER SOFTWARE CORP. Alle disse 
spil markedsfores under navnet 
WINDHAM CLASSICS, og de titler 
som Jeg modtog er: SWISS FAMILY 
ROBINSON, BELOW THE ROOTog 
ALICE IN WONDERLAND. De to 
sidstnaevnte er en hell ny form for 
adventurespil, Hele spillet styres af 
et joystick, ogsa de almindelige 
kommandoer som: EXAMINE. 
TAKE, BUY, SELL, DROP, USE etc. 
For at bruge en af disse komman- 
doer, ma man udvaelge den fra en 
menu af kommandoer, der kommer 
frem pa. skaermen, nar fireknappen 
pk joysticket trykkes ned samtidig 
med. at man traskker joysticket til- 
bage. Hvis du vil bevaege dig, forgar 
det pa samme made som i alminde- 
lige spil. Bade i Alice in Wonderland 
og Below the Root er baggrunden 
udfort meget flot, med meget stor 
oplosningsgrafik. Figurerne og dy- 
rerne kan bevasge sig. 

ALICE IN WONDERLAND er ba- 
seret pa bogen af Lewis Carrol. I 
dette spil er du naturligvis Alice, og 
du skal prove at fiygte tor Eventyr- 
landet forsvinder. For at gennem- 
fore spillet, er det nodvendigt at 
mode de fleste af personerne fra 
bogen - bade Filurkatten, Peter Ka- 



nin og Hattemageren. Alle disse og 
flere til. vil give dig oplysninger. men 
de ma behandles pa forskellig 
made, og de fleste svar vil blive gi- 
vet pa vers. Andre vil synge en sang 
for dig, og hvis du gentager sangen 
tor andre personer i spillet, kan du 
fa yderligere hjaelp. Men hvis du 
ikke behandler dem ordentligt. er 
der mulighed for, at nogle af perso- 
nerne ikke vil hjaelpe dig. og sim- 
pelthen forsvinder. Alice in Wonder- 
land kan kun fas pa en 2-sidet di- 
skette, og indeholder 250 skaarm- 
billeder og mere end 60 forskellige 
personer. Spillet indeholder ogsa 
en 12 sider lang instruktionsbog, et 
kort over personerne, der kan bfu- 
ges til at optegne de informationer, 
som du modtager tra de forskellige 
medvirkende. 

Skont spillet henvender sig til 
unge tra 10 ar og opefter. er et rime- 
ligt kendskab til engelsk nodven- 
digt, 'og det er ogs5 tilradeligt at 
have et eksernplar af bogen ved si- 
den af sig, nar man giver sig i kast 
med spillet. 

BELOW THE ROOT er baseret pa 
en trilogi af boger af den amerikan- 
ske forfatter Zilpha Keatly Snyder 
Denne trilogi var ligesa populaar i 
USA. som Tolkiens -Ringenes 
Herre* har vaeret i Europa. Handlin- 
gen, som ogsa er joystickkontrolle- 
ret. foregSr i "Land of the Green- 
Sky«, hvor de fleste mennesker le- 
ver i traeer. Opgaven er at finde og 
redde Raamo. Raamo er en dreng 
med andelige evner. som det er lyk- 
kedes for, at genforene de to racer 
de treelevende Kinder og Erdlin- 
gerne, som bor pa jorden. Nu er 



Raamo imidlertid blevet kidnappet, 
og med mindre han bliver reddet 
inden 50 dage, vil -Land of the 
Green-Sky- do. 

Der er mulighed for at vaelge mel- 
tem 5 forskellige hovedpersoner, og 
hver af dem er udstyret med hver 
sin udholdenhed og kvote af mod. 
Spillet er forskelligt i forhold til. hvil- 
ken hovedperson, du veelger. Ud- 
holdenhedsfaktoren, der mdklude- 
rer sovnbehov, hvor meget mad du 
har, og din andelige styrke er vigtige 
ting i spillet. Du skal vaere opmaerk- 
som pa. at dit sovnfliveau ikke falder 
til under 0, da du sa vil besvime og 
forst vagne op nasste dag i dit eget 
hus. og dermed har mistet en dag. 
Din andelige styrke er nodvendig at 
have pa et hojt niveau, da du ellers 
ikke kan lasse andre folks tanker, fa 
grene lil at gro pa traaerne. telepa- 
tere ting fra et sted til et andet, eller 
dig selv til andre steder i spillet. 

Spillet er igen en fantastisk 
pakke, med en instruktionsbog, der 
Mart fortaaller om de ting, du skal 
have fat i, introduktion af de perso- 
ner, du kan vaslge som dine hoved- 
personer, og en forklaring pa, hvad 
du skal bruge de ting til, du finder. 
Desuden er der ogsa vedlagt et 
kort, og for at gore det mere inter- 
essant, er ikke alle 512 skasrmbille- 
der afsat pa det. men det kan ga an 
for en start, og deekker de fleste af 
de steder, der er nemmest at 
komme til. 

Skont jeg tidligere har kritiseret 
joystickstyrede adventurespil med 
grafik, er jeg nu tvungel til at tage 
mine ord i mig igen, da grafikken i 
disse to spil er helt fantastisk, og de 
har veeret en glasde at spille. Lige- ► 
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som Alice in Wonderland er Below 
the Root ogsa kun til salg pa en 
tosidet diskette, og programmeret 
af Dale Distiaroon. 

Det sidste spil fra Windham Clas- 
sics er SWISS FAMILY ROBINSON. 
Spillet er bygget pa en roman af Jo- 
han Wyss, som han skrev for 150 ar 
siden. Spillet fortseller historien om 
et skibsforlis, udforskningen og 
flugt fra en ode o. I modsastning til 
de to andre spil, er dette et normalt 
tekst- og grafik adventure spil. 

I spillet har du rollen som Fritz, 
der forst ma redde sin familie fra 
skibsvraget, og derefter sikre sig at 
de ikke dor af suit eller torst, for han 
kan finde en flugtrute fra oen, Det er 
ikke nodvendigt at tegne et kort i 
dette spil. fordi computeren gor det 
for dig. Men det er dog nodvendigt, 
at finde ud af, hvad de forskellige 
ting du finder, skal bruges til. For at 
hjselpe dig med det, har du et eks- 
emplar af bogen »Ttie World Travel- 
lers Guide to Nature-. Ved at skrive 
OPEN BOOK, og derefter FIND ... 
(den ting, du nu onsker at leese om), 
vil computeren skrive, hvad der star 
i bogen om emnet. 

Selvom spillet ikke er s5 avance- 
ret opbygget som Alice in Wonder- 




land eller Below the Root, vil dette 
spil appellere til mange, og abnings- 
scenerne er sa fantastiske, at de ma 
ses, for man kan tro det - det er 
naesten tigesom at se en film. 

SPINNEKER SOFTWARE har 
ogsa markedsfort tre andre spil un- 
der navnet Windham Classics, som 
jeg ikke har modtaget endnu. Disse 



er ROBIN HOOD. THE WIZARD OF 
OZ og TREASURE ISLAND. Jeg ser 
frem til at kunne skrive om disse spil 
i fremtidige numre af RUN. ■ 



(/$/&t og f le'r bruger BWW-programmer 

Hvorlor mon? - Jo fordi vi lavor saerdeles brugervenllge og af- 
mysWlcorede programmer, hvor du irygi kan ga kgang med det 
samme uden farst at leese en tOO-siders vejtedning. 

BWW-TEKST (med «0A)dlsk kr. 607.- band kr. 548.- 

Menustyroi tokstbehandling med mulighed (oral brugo grafiktasierno 
(ved grafik fjemes (asr linie afstand. og tekst beartoefdning sker 
med pil- taster) 

BWW-MIX dl/b kr. 98.- 

Yatry - Master Mind - Ordmix 



NYHEDER NYHEDER NYHEDER NYHEDER 



BWW-MULTICARD (ffOAaeoa) di/b kr. 498.- 

Kartoteksprogrammei du sefv kan tilpasse, 
desuden kan del ogsa summere 
BWW-Multicard er, sammen med BWW-!ekst. en utrolig mulighed 
for at give diverse udsendelser som salgsbreve. ttfbud. prislister 
m m., et siaarkt personligl praeg 

BWW-ANNUITET di/b kr. 298.- 

A fbetalings programme! enhver forretning bor have 

BWW-KOPIERING disk kr. 158.- 
BWW-TEGNS/ET dl/bkr. 98.- 
BWW-SOFTWARE 

laver desuden bestilHngsarbejde pa programmer til C 64, 

Ogsa salg til 
forhandlere- 
f a besog af vor 
systemkonsulent 



B\X/\X/ 

SOFTWARE 



tritlegirdsvei 208 
8210 arhus v, W. (06) 152710 



►w lu Cue (or si lys* leHsitohanditng med tyske (egn U Wucrm og onnw k§h w nu oat* 
>-.isa dig el sidem. .del vi w lavoi BWW- TEXTSTAfl u> om\ lysk- mwk»g |nr»dn u en f.r-f^ 



Glem maskinkode 

600 x raskere med Basic -Aid 



Suptrayhet III Commodore 64: Den nyutvtklede Basic -Aid' kompilaloren 
gjer at Basioprogrammenc dine gar like reskt som om de or ikrovet 1 

n&skinkode. Kelt nye teknikker gjw det muhg at Basit-programmene 
ga/ oppld he«e 600 ganger raskere. 

Dette er swrt mye nskere enn tilsvarende oversatt program tra alle 
andre Basic-kompilatorer til Commodore 64 pa markedet, som t.eks. 
-Peupeed-. -Auslrocomp- 09 -Jetpick- Basic-AirJ" koster samtidig 
under nalvparten av hva de nevnte kompilatosrene koster 

Basic-Aid* oversetteret tOKbytes Base-program uopetav 0are5i«kun- 
dw. Mdskmkoden Bastc-Atd ' lager av programme! ditt, vil 1 mange til - 
teller ta mmdre plass enn ditt oppnnnelige Basic-program 

Basic-Aid" tijelper deg a na de programmeiirtgsmaJene du har satl 
deg. uten lidkrevende mjskinkodeprogrcmmcring tra din side. Det lerdig 
oversaHe Basic-programmel kan seMalgelig kiores uten Basic-Aid* 
idstede 1 maskinen Det betyr at du kan seiis BroBrimmMi. stmt den til 
lidwkrrttef. eller utvekile den ned mm, Basic-Aid " leveres komplett 
med norsk bruksanwsning. 

Multisystemer postboksiorhussbb h-smi maugesuho 



E. Guibrcindsen. tekn. redaktor Mikrodata: 

ieg er meget mponert over Bos*c-Ak1 5 mulighe-tor' 



Ja.send meg snarest 
oppkravsgebyr. 

Navn: 

Adfesse. . 
Sted 



. . . stk. Basic-Aid' a ki 298- * pono og 
OKASSETT □ DISKETT 




Maskinkode del 4. 



Af Jorgen Jorgensen 

VI skal denne gang gertnemga ad- 
resseringsmader - nogle er nemme 
at forsta og huske. mens andre er 
mere komplicerede. 

Hvad menes der sa med .en 
adresseringsmade? Til c!e fleste as- 
semblerkommandoer skal tilfojes 
en henvisning (argument) til en' 
adresse. og det er disse forskelJige 
henvisninger eller adresseringsma- 
der, vi skal kikke pa.Der er ialt otte 
forskellige adresseringsmader. 
men det er ikke alle kommandoer. 
der kan anvende alie otte. 

Vi ser pa adresseringsmaderne 
ved hjaelp af kommandoen LDA 
(LoaD Accumulator). 

Absolut 

Absolut er den forste og nemmeste 
adresseringsnade. Syntaksen er: 
LDA adresser 

Adressen (udtrykt i hex) er en 
adresse i omradet 0-65535. 

Skriver man eksempelvis 

LDA C000 

iOvil accumulatoren indleese den 
vserdi, der ligger i adresse C000 
(49152). 

Denne instruktion en en 3 bytes 
instruktion. 

Absolut indekseret 

Disse to adresseringsmader er nor- 
malt heller ikke nogen, der voider 
besvasr. og de har synlaksen; 
LDA adresse.X 
LDA adresse.Y 

I dette tilfaelde skal accumulato- 
ren ikke indteese indholdet tra den 
adresse, der star anfort, men fra ad- 
ressen plus X (eller Y). Et lille eks- 
empel; 

LDA COOO.X 

Hvis indholdet i X-registeret er 3, 
vil accumulatoren indlase indhol- 
det fra adresse C003 (49155). 

Indekseret-indirekte 

Nu begynder problememe sa smat 
at komme. 

LDA (zeropage-adresse.X) 

Jeg ma nok hellere forklare, hvad 

en 2eropage-adresse er. 

Zeropage betyder -side nul« og 

her taankes pa side nul i compute- 

ren dvs en adresse fra omradet 0 til 





mm 




mm. 



255. Man skal ogsa kun angive to 
tegn - altsa 2F og ikke 002F. 

Vi har set, hvad indekseret star 
for, og at det ••inddirekte- betyder 
kun, at hverken den angivne eller 
den udregnede adresse indlasses 
med kommandoen LDA. Derimod 
gaslder den udregnede adresse 
som henvisning til nok en adresse, 
der sa mdlasses. 

Puh, mon ikke et eksempet vil 
veere pa sin plads. 
LDA (4F.X|Laa os vedtage, at X 
f.eks. har vaerdien 10 og for en or- 
dens skyld oplyse. at 4F (Hex) er79 
(Dec). 

Ved samme fremgangsmade 
som det foregaende. kommer vi 
frem til adresse 89 (10 + 79). 

Adresse 89 har f.eks. vaerdien 
1A, svarende til 26 (Dec). 

Adresse 90 har f.eks. vairdien 

4 og det svarer ogsa til 4 (Dec). 

Hvad gor vi sa? Vt siger 4 
(adresse 89) gange 256 og det er 
1024. Dertil Isegger vi veerdien fra 
adresse 90 (26) og kommer til resul- 
tatet 1050. 

Indholdet fra adresse 1050 indlee- 
ses sa i accumulatoren. 

Inddirekte-indekseret 

Helt aarligt. der er svaert i starten 
ikke at rode de to sidste mader 
sammen. 

Lad os forst se syntaksen 
LDA {zeropage-adresse),Y 
Ingen nye fremmedord. sa vi gar 
lige pa og hardt med et eksempel. 
LDA (4F).Y 

4F er stadig 79, og nu inter- 
esserer vi os for indholdet af 
adresse 79 og 80. Vi tager de 
samme vasrdier som for 26 (Dec) og 
4 (Dec). Efter samme regnestykke 
som sidst (4x256 + 26) kommer vi 



til 1 050.. Til denne adresse Isegger vi 
indholdet af Y registeret (10 Dec) 
og kommer frem til 1060. 

Indholdet fra denne adresse ind- 
lasses nu i accumulatoren. 

Svsert? Prov at kikke lidt pa det 
og regn nogle andre eksempler 
igennem. Det er egentlig logisk nok, 
og vil man videre, sa skal det for- 
stas! 

Umiddelbar 

Det er vel ikke helt korrekt at kalde 
denne for en adresseringsmade, for 
den henviser ikke ti) nogen adresse, 
men laagger et tal direkte ind i accu- 
mulatoren. 
LDA # argument 

Hvis det pagasldende argument 
er FF (255 Dec) ser kommandoen 
sadan ud" 
LDA ttSFF 

Den har vi set for, og den voider 
ingen problemer. Tallet, der skal 
lasgges ind, ma naturligvis ikke 
vsere storre end 255 (FF), og kom- 
mandoen kendes pa nummertegnet 
#- 

Zeropage 

Der findes to adresseringsmader 
mere, der refererer (II zeropage- 
omradet, nemlig zeropage og in- 
dekseret zeropage. 
LDA zeropage-adresse 
LDA zeropage-adresse.X 

De fungerer nojagtig som de til- 
svarende ..ikke-zeropage- adresse- 
ringsmader. blot med den forskel. 
at vi kun angiver to cifre - altsa FF 
og ikke 0OFF. 

Vi lader det vaere godt med det 
for denne gang. L2er disse adresse- 
ringsmader og vaar sskker i dem til 
vi naeste gang kaster os over et par 
praktiske eksempler. ■ 
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► Fortsat fra side 16 
Basic 1 

Reduktioner 1 (sammentraakning af 
en raakke led) 

Reduktioner 2 (sammentaalling af 

bogstavudtryk i op til 5. potens) 

Statistik (op til 500 data) 

Graf dump (sojlediagrammer til 

printer) 

Tselle 10 (trasning i at tselle) 
Klokken (training i at lasre klokken) 
Levevis (ernaanngsprogram) 
Halveringstid ( simuleringsprogram) 



Comal 2 

Simmer komb (interaktiv simulation 
i kombinatonk) 

Statistik 8 (laver deskriptorer, ta- 
belle, grafer og frekvens) 
Statistik 9 (som ovenstaende, men 
svserere) 

Sammenknytninger (laver lineaer re- 
gression pa talmaterialet og korre- 
lationskoefficienten udskrives) 
Familiebudget (mini-regneark) 



Basic 2 

Kredslob 1 (modstande og parallel- 
kobling) 

Kredslob 2 (nassten som 1, men 
med 2 parallelkoblinger. der regnes 
i Ohm. volt og ampere i begge) 
Stromforsyninger 
Ohm's lov 

Henfaidsreekke (simulerer nuklideri 
en henfaldsrsekke i forhold til tiden) 
Halveringstid 

Varmefylde Cal (simulerer 3 kalori- 

meterforsog) 

Varmefylde Joule 

Stoffysik (indeholder stofnavne, 
masse- og varmefylder, beregning 
af manglende storrelse, baneradier, 
hastigheder, krsefter og energi. kan 
kombinere) 



Det er efter min rnening et ganske 
paent programbibliotek, skolerne 
far foraeret, og mere er som sagt pa 
vej. Af ovennaavnte programmer er 
der nogle virkelig gode program- 
mer, det gaelder f.eks. stoffysik og 
uden at ga tor meget i detaljer. for- 
tjener det lidt ekstra forklaring.Pro- 
grammet er et hjselperedskab til 
losning af problemer i den elemen- 
taere stof-fysik, det har en tabel, der 
indeholder stofnavne, massefylder 
og varmefylder i bade cal/joule/ 
grad og gram. Det er delt op i tern 
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dele, der indbyrdes kan arbe)de 
sammen. Det styres fra menuen, 
hvor folgende va!g er mulige: 

a) direkle indgang i fysisk bereg- 
ning 

b) direkte indgang i geometrisk be- 
regning 

c) el overfort rumfang fra geometri 
i del 5, kan bruges ved beregning af 
masse i masse-fysikken i del 1 

d) det fundne massetal kan bruges 
i del 2, 3 og 4, som omhandler cen- 
trifugalkraft. potentielenergi og var- 
meenergi 

e) det ved masse-fysikken i del 1 
fundne rumfang kan overfores til til 
geometri i del 5, hvilket muliggor 
losning af en ubekendt geometrisk 
storrelse. 




Dette program, som er dansk, er et 
eksempel pa, hvordan computeren 
bor bruges i undervisningen. Det 
samme gaslderfor Sammenknytnin- 
ger, der er lavet til sammenlignende 
statistik, og pa disketten ligger 
nogle faardige data om 20 lande, 
som man kan hente ind. for at se 
hvad det kan. Jeg havde selv stor 
morskab ud af at sammenligne Ian- 
denes antal af TV-apparater og fod- 
selsoverskud, og fodselsoverskud 
med antallet af telefoner. Man kan 
selv lave de data, man vil have sam- 
menlignet, og sa fa dem ud, enten 
i sojlediagrammer. koordinatsyste- 
mer eller i tabeller 

Registre er ogsa et virkeligt godt 
program, det simulerer forskellige 
offenttige registre, og hvilke opiys- 
ninger der kan taankes at ligge pa 
disse. Det giver ogsa et billede af, 
hvordan man kan beskytte regi- 
strene mod at ikke autoriserede far 
adgang til oplysningerne. da det er 
nodvendigt at bruge et kodeord for 
at laase i registrene. og et andet for 
at sendre dem. Det demonstrerer 
ogsa faren ved samkoring af for- 
skellige registre. da hseftet giver 
forskellige forslag til, hvordan man 



kan bruge programmet j undervis- 
ningen. er det meget nemt for en 
laerer at arbejde med del. 

Jeg ville gerne have omtalt fiere 
af programmerne naarmere, men 
pladsen er begrasnset. Jeg vil dog 
lige anbefale programmet "Familie- 
budget". elektronikprogrammerne, 
samt stavetraeningsprogrammerne. 
Til de sidste savnede jeg dog et 
standard ordforrad til de enkefte 
klassetrin, samt en tilfseldighedsge- 
nerator, sa ordene ikke kom i 
samme raakkefolge river gang. 

Af de 18 skoleprogrammer, jeg 
ved er i stobeskeen til Commodore 
64, vil jeg kun naevne nogle fa. Der 
er et program til dansk grammatik, 
hvor man lasrer om navneord - be- 
regnet til 3. og 4. klasse, Et andet 
program hedder 20 sporgsmal. hvor 
det er eleven, der er professoren og 
computeren. der sponger. Det teg- 
ner til at blive godt. da det demon- 
strerer, at computere ikke kan 
mere, end de har faet fortalt. Der er 
et program til optraaning af lasseha- 
stighed, som grundet computeres 
uendelige talmodighed. vil vasre en 
god hjaelp til dem , der har svaert ved 
at Isese. 

Til dansk-undervisning kommer 
ogsa et program, der indeholder tre 
historier. som alle mangier nogle 
navne, navneord. verber. adverbier. 
adjektiver og bygningsnavne, som 
eleven selv skal indtaste, hvorefter 
computeren sa selv ssetter dem ind, 
og eleven kan sa se, om der er b!e- 
vet en lasselig historie ud af det. 

Som det tremgar af ovenstaende, 
findes der allerede en maengde 
dansksprogede programmer til 
brug i undervisningen. men de helt 
store, der er integreret med under- 
visningsboger i f.eks. samfundsfag, 
rnatematik og fysik. varer det nok 
stadtg laenge inden vi ser pa dansk. 

Jeg tror ikke det sker, for de fa 
danske software-huse far stillet 
nogle penge til radighed til udvikling 
af programmer. Men det at kobe og 
betale et program til et ikke pa for- 
hand fastsat belob krasver nok en 
del nytasnkning hos vore admint- 
stratorer. Det er nok nodvendigt, 
hvis der skal seettes noget igang, da 
det er dyrt at udvikle programmer til 
et sa lille sprogomrade som Dan- 
mark. ■ 



Superhelp 



20 extra basic kommandoer, 
disassambler. monitor, extra disk 
kommandoer og 2 pass assambler 
Beskrevet i Run nr. 4 - 85 

739,- 




DATA 

Tilbehor 



80 Tegnskort 

Til CBM 64 

F& SO legn pr. 
linie + 
fasrfrysnlng 
og lid pa 
skaarmen 

KUN 1498,- 



Motherboards 

2, 4, 5 og 6 slots med 
og uden omsk. 
ba^e til CBM 
og VIC 20 

FRA KUN 249,- 




OPHUG 

Paknlng nr. 4 

mere end 250 komponenler 
17 stk. nixieror 
20 stk. IC-74 senen TTL 
35 stk. smd signal transistorer 
170 stk. modstande 

1 stk. spsendingsconveTer 12 Vdi 
1 stk. dejlig kasse til indbyg*;rjg ; 
* dlv. kondensaiorer og modsiafldfc: 

Paknlng nr. 5 "i! 

mere end 200 komparKOtB/"* ' 

35 slk. pcerer 

35 stk fatninger • • • ; " :;:r^A 

20 stk.^smd sjgnaj jr^sistdrfej' 

1 i K-tf 4 series ztc : : : : ' 
9astK.:mbdslande 
StsW. dejlig kapsp. Ill mdbygning 
> konden^ai^er og dioder 



:m Was 




8K Storeboard 

8K RAM + 1 1 sokler for 
montering efter eget valg 

775,- 




Epromkort med 

Omsk M CBM 64 

275,- 

M Fas ogsa 111 
Vi VIC 20 uden 

omsk 220,- 
Skal bruges til brmndfi\ 






^Eprci^brayhde? 



raerj^pr .dine »gne 
. ; ; : fiprom --: wan wreende 

2SQ&: *21\§g7$2, 2764, 27128 
»•••' sgpit^ modeller:. 

. ; !i::::::::T098, r ;;ji: : ;.;.. 



STK0WFORSYNING 

+24 V 3 A, +■ 12 V 1 A, 
+ 5 V 1,5 A, -12 V 1 A. 
og 4 220 V udtag 

KUN 175,- 



Lyspeni:."' 

medp/agrani }j; 
.:, Q8M;64:::::: 

:ii:;:.5dS^ :: ;;ji 



HeJMtover har vi 
! en del kdrpfrtmikationsudstyr 
': ifiaoit cartrtagdes til bade 

•:::;: CBM 64 og vie 20 
: ;:;;Stng og her: 
' (09) 99 23 99 



ST0VH/ETTE 

Til bade 
CBM 64 og 
VIC 20 

45,- 



ANTEX 
loddekolbe 

220 V - 24 W 

118,- 



: 40/80 XdfihfeVort til VIC 20 
:Gfef diri#ft 20 prof, med 
' "4$:liijisr og fra 1-80 tegn 
"::■' pr. linie 

1198,- 




Epromsletter ) 



med plads til 
4 programmer 

545,- 



::: LCD DISPLAY. 2x3 cifre i 
eet hus. 
Indeholder 6 stk. 7 segment 
4 kommaer + 6 forskellige tekster: 
KPa. mmHg, DEV. ACT. CAL, mW. 
Kan monteres i 68 ben dilsokkel. 

Virkelig gode lil f.eks. 
stromforsyninger, multimetre m.m. 

Pr. stk. KUN 35,- 

10 stk. KUN 300,- 



Krystaller til aile formal 
leveres pa kun 6-12 dage. 
Lagervarer leveres 

fra dag til dag 
Frekvens omrade 
1-175 MHz. 



Tlf. 09 992399 



m ^^^^ Svendborgvej 17 



5792 Arstev 

KRYSTALLERoPRINToDATA 



Med over 6000 Krystaller pa lager, 
kan vi tilbyde dig det sterste udvalg 
med dag til dag levering. Vi leverer 
dig stadig specialslebne krystaller i 
omr&det 1-175 MHz pa den korte- 
ste tid og til laveste pris. 



Fortsat fra side 57 

med TURBO-SAVE (Desvairre 1 ) . 

Hvis I forandrer navnet i linje 145, 
skal REM-udtrykket Ikke tastes tad. 

Hvis I gemmer to programmer 
med TURBO efter hinanden pa ban- 
det, m& l huske (noter taelleren pa 
bandstationen), hvor de forskeilige 
programmer begynder. Det gar ikke 
an, at lade rnaskinen lede sig frem 
til f.eks. program nr. 2, 



Tabel-1 / A-veerdier 



A / HEX / DECIMAL 

o = sooop / 0 

16 = SO40O / 1024 
32 = $0800 / 2048 
48 - SOCQQ / 3072 
64 = SO10O / 4096 
80 = $1400 / 5120 
96 = S1800 / 6144 
112 = S1CO0 / 7168 
128 = $2000 / 8192 



144 
160 
176 
192 
208 
224 
240 



S2400 / 9216 
$2800 / 10240 
S2CO0 / 11264 
$3000 / 12288 
$3400 / 13312 
$3800 / 14336 
S3C00 / 15360 



GRAFIK/TURTLE 
MODE 
f 1 tekstskaerm 
f 3 splitskaerm 
f5 qrafikskaerm 


CBM-64 
normal - mode 


f 1 

RENUM 




f 2 

MOUNT 


f3 

TURTLE 


f4 

AUTO 


f 5 


f 6 


EDIT 




LIST 


f 7 


f 8 


RUN 




SCAN 


COMAL 80 
version 2.01 
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ALT1DMRETTESP0RMED 





EJ EN STANDARD-DISKETTE MEN 
PR IS SOM EN SAD A N. 
LEVER ES I PLASTBOKSE SOM STANDARD. 
EG EN PRODUKTION ERA A-Z. 
LIVSVARIG NEDSLID'S GARANTI. 

Eksempler hvor Xidex gir langt over ansi krav: 

• 65% clip-level (h0jeste i branchen). 

• Centerhul's tolerance forbedret med 50%. 

• Altid perfekt sporing. 

• H0jglanspoleret overflade. 

• Nul slid pa hoved og diskette. 



ENEIMPORT0R: 

Langelinie 15, Snekkerup, 4140 Borup. 
Tlf. (03) 62 88 00. 




RUN Amok 



I RUN nr. 5 1985. bragte vi et tekst- 
behandlingsprogram, skrevet i Co- 
mal 80 Version 2.00. Vi var imidlertid 
sa naive at Iro. al den nye version 
2.01 er fuldt kompatibel med den 
gamle. Del er den desvserre ikke. 
men folgende retteiser skulle ta det 
til at virke. 

Folgende to linier rettes: 
0090 DIM b$(l90) OF 80, tb (80), 
tk(190), fil$ OF 14 
6150 b$(190): = » «; tk(190): = 0 

I folgende 6 linier skal »l: = 200« 
rettes til »l: = 190- 
3160. 4010, 4260. 4620. 5650. 5940. 

I disse 6 linier skal »200" erstat- 
tes med »190«: 

0110, 3050. 3680. 4600. 5620. 6120. 

Dette var alt, og vi haber, at 
mange vil ik glsede at dette udmaar- 
kede tekstbehandlingsprogram. 



L/ESERANNONCER 

CBM-64 Cartridge spil 

Soccer, Lemans, Avenger, Seawolf, 
Lazariaa Star ranger, Super Smash 
kr. 40,- stk. 

Org. band: Bic mac. Vortex Raider. 
Stix, Sorcery. Potty Painter, Pigs in 
Space, Laser Zone + 25 andre kr. 
30,- stk. 

Karsten Dinesen 
Hejrebakken 6 
3390 Hundested 
Tlf. 02-339286 

Fantomdriver 

Topp bilspill med en bane, som 
scroller over 12 forskj. skjermer til 
uexp. VIC-20.vPris 60 Nkr. pr. kass. 
( + Nkr. H.oo hvis betaling ikke er 
sendt med postanvisning/sjekk) 

NB : Kun Norge! 

Tor Rune Skoglund 

7970 Kolvereid 

Norge 

Overspilnlng af Comal program- 
mer/filer mellem C-64 og RC Picco- 
line/Partner udfores, 

B.Christensen - 05.642707 




GAMLE RUN'ER 



Der er mange laesere, der onsker 
en komplet samling af RUN. Vi 
har jaevnligt foresporgsler, og 
kan i den anledning oplyse, at 
man ved indsendelse af kr. 25,- pa 
postgiro 1 48 31 61 kan fa sendt 
det nummer, man mangier. 



INDSENDELSE AF 
PROGRAMMER TIL RUN 



Har du skrevet et godt program, 
som du mener har interesse for 
andre, kan du sende en kassette 
eller diskette til RUNs redaktion. 
Onsker du det indsendte materia- 
le returneret, bedes du venligst 
vedlaegge frankeret svarkuvert. 

Alle programmer, der trykkes i 
RUN, praemieres med 10 disket- 
ter eller 24 band efter eget onske. 

Som privatperson kan du llge- 
ledes annoncere gratis i RUN. Be- 
tingelsen er dog, at det ikke er pi- 
ratkopier, du vil seelge. Hvis re- 
daktionen skonner, at dette ertil- 
fasldet, vil annoncen Ikke blive 
bragt. 

Vi gleeder os til at here fra dig. 



Kobes 16K RAM modul til VIC-20. 
Benr Clausen - 01.490416 

Saelges 

VIC-20 kr.500. 16K ram kr. 350, Jo- 
ystick kr. 125, Kassettespiller kr. 
175. 

Bind til VIC-20 

Racer, Android Attack, Frogrun. 
Krazy Kong (16K) kr. 65- stk. 
Ca. 50 andre spil kr. 20-50. 

Det hele for kr 1.200,00. 
Claus Mortensen 
Tjornevej 11 
5800 Nyborg 

Sselges 

POKERUNDTIVIC, 1. del. Tips sam- 
let og Vist i programmer. Fylder 16K. 
kr. 115.00. 

POKE RUNDT I VIC, 2,del Intern re- 
gister, Nogleord-kode, Load ny pro- 
gramdel, Save programdel, Slet 
programdel. Fylder 16K Kr. 115,oo. 

Begge dele band 
Programmerne er i Basic med 
mange rem-saatninger. 
Willy Johansen 
Rugvaanget 30 
7400 Herning 
tlf. 07-126069 



Grindsted Commodoreklub 

Modedag torsdag pa Grindsted 
Gymnasium. 

Simon Andersen - 05.321207 

Commodore Klubben i Grena 

Skriv til Mads Petersen. Skovsvin- 
get 32. 8500 Grena. 

Varde Computer Bruger Club 

v/Jan Sondergard - 05.224883 

Brother printer/skrlvemaskine 

med tekstbehandlingsfacilitet til 
C64 ssBlges kr. 3000.00 incl. interfa- 
ce.Niels Erik Andersen - 05.180399 

Til VIC-20 Sargon II Chess kr. 30,00 
- Omega Race kr. 25.00 Kassette- 
station kr. 250,00 - Defekt VIC kr. 
200.00 

Ivan Petersen - 02.392832 

Calc Result plus bogen -The power 
of CR» - Regane database samt 
PCS-kartotek, saelges. 
P.Brahde - 08.910206 

Administrative programmer til 

Commodore og Armstrad efterly- 
ses. Har du selv lavet nogle pro- 
grammer, kan du kontakte os. 
Mulighed for god indtjening. 
01.415153 
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»qualimetric« 
g0r det lettere 

Vi gordet superletfor deresdataan leeg: BASFdata-media med -qualimetrio-symbol-et er 
kendetegne! for pertekt og Sikker kvalitet Fra FlexyDisk til pladernodul er vi I den seer- 
lige situation, at vi kan omsaatte vore samlede erfaringer til topprodukter. Vi optimerer 
kvalttettil BASFspecialitet. Denne ekstrasikkerhed lonnersigog gordet leltere forDem. 



i » 



■BASF 

% FtexyDi! 



O 



■BASF 




n A QTT Alle BASF data-media erspecielt 

.Q/""\C)I~ udviklede, speciell producerede og 
1 -i • I i gennemtestede, Det er BASF's 

: iCVCIllIGT saerposition engarantifor.Overhele 

verden engageret i kemi pg fysik. 

s® rdeles erfaren i samspillel mellem 

apparat og medie. Det ergrundlaget 

lor BASF topkvalitet. 



A/S Badilin 

Ved Stadsgraven 15 

Postboks 1734 • (01) 5700T1 
2300 Kobenhavn S 



lasts I 



JU 



Arets nyhed! 



HOLSTEERO B IBLIOTEK 

INFORMATION 
KIRKESTRtfDE 11 
7500 HOL-3! EBRD 




OGPA er forst med nyhederne 
- ogsa med den laenge ventede 
Commodore 128. 



it. 



Ja tak! 



□ Jeg snsker yderligere information om arets nyhed: 
Commodore 128. 

□ Jegonsker al bestille arets nyhed: Commodore 128. 

Navm 



Adr.:. 



Postnr.: . 



By:. 



Din BOGPA handler 
findcs over hele iandet. 



BOGPA 

Industrivej 
7120Vejle 
Tlf. 05-81 63 00 



mm 



